Toniolo and Linder, Equation (3a)

Time bar (total: 5.9s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze163.0ms (2.8%)

Memory
-15.8MiB live, 236.3MiB allocated; 55ms collecting garbage
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.3s (38.3%)

Memory
53.7MiB live, 3 250.3MiB allocated; 611ms collecting garbage
Samples
1.7s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-sin: 473.0ms (35.6% of total)
ival-pow2: 393.0ms (29.5% of total)
ival-mult!: 154.0ms (11.6% of total)
ival-sqrt: 134.0ms (10.1% of total)
ival-div!: 107.0ms (8% of total)
ival-add!: 68.0ms (5.1% of total)
adjust: 2.0ms (0.2% of total)
Bogosity

preprocess43.0ms (0.7%)

Memory
-20.2MiB live, 29.4MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0134413
1488379
22336379
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.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))))))))))
Symmetry

(abs l)

(abs Om)

(abs kx)

(abs ky)

(sort kx ky)

Compiler

Compiled 58 to 44 computations (24.1% saved)

series118.0ms (2%)

Memory
16.4MiB live, 192.4MiB allocated; 25ms collecting garbage
Counts
22 → 182
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
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
Calls

12 calls:

TimeVariablePointExpression
28.0ms
ky
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx (pow (sin ky) 2) (sin ky) ky)
11.0ms
kx
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx (pow (sin ky) 2) (sin ky) ky)
10.0ms
Om
@inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx (pow (sin ky) 2) (sin ky) ky)
9.0ms
l
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx (pow (sin ky) 2) (sin ky) ky)
9.0ms
l
@inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow (sin kx) 2) (sin kx) kx (pow (sin ky) 2) (sin ky) ky)

rewrite415.0ms (7%)

Memory
43.3MiB live, 290.2MiB allocated; 155ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0108317577
0111215888
1694815888
0833814821
Stop Event
iter-limit
node-limit
iter-limit
Counts
204 → 262
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
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow kx 2)))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx kx #s(hole binary64 kx))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (pow (sin kx) 2) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow ky 2)))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (pow (sin ky) 2) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx ky #s(hole binary64 ky))
#s(approx (pow (sin ky) 2) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
Outputs
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(pow.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))
(pow.f64 (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(pow.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)))) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)))))))
(fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(+.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))))
(*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)))
(*.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))))
(fma.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))))
(+.f64 (*.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)))
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))))
(*.f64 (/.f64 l Om) #s(literal 2 binary64))
(*.f64 (+.f64 l l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 #s(literal 2 binary64) (/.f64 l Om))
(/.f64 (neg.f64 (+.f64 l l)) (neg.f64 Om))
(/.f64 (+.f64 l l) Om)
(fma.f64 l (/.f64 #s(literal 1 binary64) Om) (/.f64 l Om))
(+.f64 (/.f64 l Om) (/.f64 l Om))
(*.f64 l #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
(+.f64 l l)
l
Om
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(fma.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (sin.f64 kx) (sin.f64 kx) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))))
(sin.f64 kx)
kx
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))) (sinh.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64))))
(sin.f64 ky)
ky
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (*.f64 (sqrt.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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))) #s(literal 64 binary64))) #s(literal -1/2 binary64)) (neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 l l) (neg.f64 (/.f64 (*.f64 (sqrt.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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (neg.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (*.f64 l l)) (neg.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)))) (*.f64 l l) (neg.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 2 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (*.f64 #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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) (*.f64 l l) #s(literal 2 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)))) (*.f64 l l) (*.f64 #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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) (*.f64 l l) #s(literal 2 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (*.f64 #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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -12 binary64)))) (*.f64 l l) (*.f64 #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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) l) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))) #s(literal 4 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 4 binary64)))
#s(approx (pow (/ (* 2 l) Om) 2) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om)))
#s(approx (/ (* 2 l) Om) (/.f64 (+.f64 l l) Om))
#s(approx (* 2 l) (+.f64 l l))
#s(approx l l)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) #s(literal -1/32 binary64) (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 Om Om) Om)) #s(literal -3/64 binary64)) (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))) (sqrt.f64 #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(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (fma.f64 (*.f64 (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #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 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))) #s(literal 1/2 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (+.f64 (neg.f64 (*.f64 (hypot.f64 (sin.f64 ky) (sin.f64 kx)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (+.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 Om Om)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 4 binary64)))) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) Om))) (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))))) l))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (/.f64 (+.f64 l l) Om) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) l))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) l))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))) l))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 4 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l))) (*.f64 l l)))
#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)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) l))) #s(literal 1/32 binary64))) l)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 Om Om) Om)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) l) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) #s(literal -1/32 binary64))) l))) l)) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))) l)) #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 (neg.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))))) l)) #s(literal 1/2 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))) l)) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))))) l)) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 Om l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) (+.f64 (neg.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) #s(literal -3/256 binary64)) (*.f64 Om Om)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 4 binary64)))) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) Om))) (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))))) l)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) l)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) l)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (neg.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))) l)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (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)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) Om (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64)))) #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 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) Om (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om (sqrt.f64 #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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om #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 (fma.f64 (fma.f64 (*.f64 #s(literal 3/512 binary64) (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om #s(literal 1/2 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 #s(literal 3/256 binary64) (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (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 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 #s(literal 3/256 binary64) (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) Om))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (fma.f64 (*.f64 #s(literal -5/2048 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64)))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -7 binary64))) (*.f64 (*.f64 #s(literal 3/256 binary64) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))))) (*.f64 Om Om))) (*.f64 Om Om))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))) (*.f64 (+.f64 l l) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) (*.f64 Om Om) (*.f64 (+.f64 l l) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.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 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -5 binary64))) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -3 binary64))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) (*.f64 Om Om) (*.f64 (+.f64 l l) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) Om))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx Om Om)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64) #s(literal 1 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (fma.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64) (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/2 binary64) #s(literal 1 binary64))) (neg.f64 (/.f64 (*.f64 (*.f64 (*.f64 l l) (sqrt.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) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -1/2 binary64))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)))) #s(literal 2 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) #s(literal -1/2 binary64))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64))) #s(literal -12 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)))) #s(literal 1 binary64)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (fma.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))) #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))) (*.f64 (*.f64 kx kx) (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om))))) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))) (*.f64 (*.f64 kx kx) (*.f64 (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))))))) (*.f64 kx kx) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))) (*.f64 (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))) (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.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 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (*.f64 Om Om)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))))) (*.f64 kx kx) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))))))) (*.f64 kx kx) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)))) (*.f64 kx kx) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))) (*.f64 kx kx) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)))) (*.f64 kx kx) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 kx kx) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 kx kx) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (*.f64 Om Om)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 kx kx)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (*.f64 (*.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 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)))) #s(literal 1 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.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 kx kx))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 8/45 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx))) #s(literal 1 binary64)))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.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 kx kx))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 8/45 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.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 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (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) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (pow (sin kx) 2) (*.f64 kx kx))
#s(approx (pow (sin kx) 2) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (pow (sin kx) 2) (*.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(approx (pow (sin kx) 2) (*.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)))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx (sin kx) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 kx kx) #s(literal 1/120 binary64)) (*.f64 kx kx) #s(literal -1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx))
#s(approx kx kx)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (pow (sin kx) 2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om))))) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))) (*.f64 (*.f64 ky ky) (*.f64 (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))) (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))) (*.f64 (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal 8/45 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 16/3 binary64)))))) (neg.f64 (*.f64 (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.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 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (*.f64 Om Om)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))))) (*.f64 ky ky) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))) (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (neg.f64 (*.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal 8/45 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 16/3 binary64))))))))) (*.f64 ky ky) (neg.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1 binary64)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal 8/45 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 16/3 binary64))))))))) (*.f64 ky ky) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1 binary64)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal 8/45 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))) #s(literal 16/3 binary64))))))))) (*.f64 ky ky) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal -3 binary64)))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (*.f64 Om Om)) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 ky ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (*.f64 (*.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 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 ky ky)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)))) #s(literal 1 binary64)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 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))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) (*.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)))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.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))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) (*.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(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (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) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
#s(approx (pow (sin ky) 2) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky)))
#s(approx (pow (sin ky) 2) (*.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(approx (pow (sin ky) 2) (*.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)))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/6 binary64) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx (sin ky) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/5040 binary64) #s(literal 1/120 binary64)) (*.f64 ky ky) #s(literal -1/6 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky))
#s(approx ky ky)
#s(approx (pow (sin ky) 2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (sin ky) (sin.f64 ky))

eval68.0ms (1.1%)

Memory
6.0MiB live, 58.2MiB allocated; 37ms collecting garbage
Compiler

Compiled 11 990 to 2 080 computations (82.7% saved)

prune14.0ms (0.2%)

Memory
23.2MiB live, 23.2MiB allocated; 0ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New23912251
Fresh000
Picked101
Done000
Total24012252
Accuracy
100.0%
Counts
252 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
36.3%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))))))
70.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
88.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
91.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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
70.8%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
46.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
42.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
82.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
81.8%
(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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
63.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 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
53.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
64.3%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
Compiler

Compiled 884 to 772 computations (12.7% saved)

series117.0ms (2%)

Memory
-32.5MiB live, 154.3MiB allocated; 17ms collecting garbage
Counts
57 → 301
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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 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))))))))) #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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)))
(*.f64 l l)
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
kx
(*.f64 Om Om)
#s(literal 4 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
Outputs
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)) (pow Om 4))) (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 1))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 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 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -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)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -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))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -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))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 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)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 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)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (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))))))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 5)))))))))) Om)))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))))
#s(approx (* Om Om) #s(hole binary64 (pow Om 2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -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)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)) (pow Om 6))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (* 2 (/ (pow l 2) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow kx 2) (+ (* 2 (/ (pow l 2) (pow Om 2))) (* (pow kx 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))))) (pow Om 2)))))) (* 1/2 (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole 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))))))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/315 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (/ (pow kx 2) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (* (pow kx 2) (+ (* -1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (- (* 2/45 (/ (pow kx 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/315 (/ (pow kx 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx kx #s(hole binary64 kx))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (pow ky 2)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (pow kx 2) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow ky 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 1))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx ky #s(hole binary64 ky))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 2) (- (+ 1 (* 1/2 (/ 1 (pow ky 2)))) (* 1/2 (/ (cos (* 2 kx)) (pow ky 2)))))))
Calls

12 calls:

TimeVariablePointExpression
12.0ms
l
@inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (sqrt (* (/ 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))))
10.0ms
l
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (sqrt (* (/ 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))))
10.0ms
Om
@inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (sqrt (* (/ 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))))
9.0ms
kx
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (sqrt (* (/ 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))))
9.0ms
kx
@-inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) 1/2 (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (sqrt (* (/ 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))))

rewrite231.0ms (3.9%)

Memory
37.4MiB live, 265.6MiB allocated; 24ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0166626187
0173223709
0829522879
Stop Event
iter-limit
node-limit
iter-limit
Counts
358 → 452
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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 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))))))))) #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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)))
(*.f64 l l)
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
kx
(*.f64 Om Om)
#s(literal 4 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)) (pow Om 4))) (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 1))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 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 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -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)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -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))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -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))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 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)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 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)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (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))))))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 5)))))))))) Om)))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow Om 2))))
#s(approx (* Om Om) #s(hole binary64 (pow Om 2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -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)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)) (pow Om 6))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow kx 2) (+ (* 1/2 (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (* 2 (/ (pow l 2) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow kx 2) (+ (* 2 (/ (pow l 2) (pow Om 2))) (* (pow kx 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))))) (pow Om 2)))))) (* 1/2 (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(hole 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))))))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (* (pow kx 2) (+ (* -1/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/315 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (/ (pow kx 2) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (* (pow kx 2) (+ (* -1/3 (/ (pow kx 2) (pow Om 2))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (- (* 2/45 (/ (pow kx 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) #s(hole binary64 (* (pow kx 2) (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/315 (/ (pow kx 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx kx #s(hole binary64 kx))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (pow ky 2)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (pow kx 2) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow ky 2))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow ky 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 1))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx ky #s(hole binary64 ky))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* (pow ky 2) (- (+ 1 (* 1/2 (/ 1 (pow ky 2)))) (* 1/2 (/ (cos (* 2 kx)) (pow ky 2)))))))
Outputs
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) #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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) l) (/.f64 #s(literal 1 binary64) Om))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
l
Om
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(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 #s(literal 2 binary64) ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(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 #s(literal 2 binary64) ky))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 ky) (cos.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 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))))))))) #s(literal 1 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(pow.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 1 binary64)))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 1 binary64))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (neg.f64 (*.f64 Om Om)))
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))
(-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 Om Om)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 kx) (cos.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
kx
(*.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Om #s(literal 1 binary64)))
(*.f64 (neg.f64 Om) (neg.f64 Om))
(*.f64 (fabs.f64 Om) (fabs.f64 Om))
(*.f64 Om Om)
(pow.f64 Om #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 Om) #s(literal 2 binary64)))
#s(literal 4 binary64)
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) #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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) #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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(/.f64 (-.f64 (*.f64 (*.f64 ky ky) (*.f64 ky ky)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (-.f64 (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(/.f64 (+.f64 (pow.f64 (*.f64 ky ky) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (fma.f64 (*.f64 ky ky) (*.f64 ky ky) (-.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(fma.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (neg.f64 ky) (neg.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 (fabs.f64 ky) (fabs.f64 ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(+.f64 (*.f64 ky ky) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 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 binary64))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (pow (/ (* 2 l) Om) 2) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
#s(approx (/ (* 2 l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (* 2 l) (*.f64 #s(literal 2 binary64) l))
#s(approx l l)
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) #s(literal 1 binary64))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) #s(literal 1 binary64))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))
#s(approx (* l l) (*.f64 l l))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) (*.f64 (*.f64 l l) l)))))))
#s(approx (* (/ 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)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 Om (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) l))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) l) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) l) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))))) (*.f64 Om (*.f64 (*.f64 l l) (*.f64 l l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64))) (*.f64 #s(literal 1/256 binary64) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 Om (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) l)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) (*.f64 l l))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx Om Om)
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 2 binary64) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) Om))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) Om))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (*.f64 (*.f64 Om Om) (pow.f64 l #s(literal -5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)))
#s(approx (* Om Om) (*.f64 Om Om))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) l) (*.f64 (*.f64 l l) l)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (-.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om)))))) (*.f64 Om Om))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 Om Om) (*.f64 Om Om))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (/.f64 (*.f64 kx kx) (*.f64 Om Om)))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 kx kx) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 kx kx) (*.f64 Om Om)) (*.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 kx kx) (*.f64 Om Om)) (*.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))) (*.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 (*.f64 kx kx) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 kx kx))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 kx kx))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx))) #s(literal -1 binary64)))))
#s(approx (cos (* 2 kx)) #s(literal 1 binary64))
#s(approx (cos (* 2 kx)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 kx kx))))
#s(approx (cos (* 2 kx)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2/3 binary64) (*.f64 kx kx) #s(literal -2 binary64)))))
#s(approx (cos (* 2 kx)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 kx kx))) #s(literal -2 binary64)))))
#s(approx (* 2 kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx kx kx)
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 ky ky))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (fma.f64 kx kx (*.f64 ky ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (fma.f64 (*.f64 kx kx) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx))) (*.f64 ky ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)))) (*.f64 ky ky)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(approx (cos (* 2 kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 ky ky)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (-.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 l l)) (*.f64 (*.f64 (*.f64 Om Om) (*.f64 Om Om)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (*.f64 ky ky) #s(literal -1/3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 (*.f64 ky ky) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 ky ky)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2/45 binary64) (*.f64 ky ky) #s(literal -1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal 1/315 binary64) (*.f64 ky ky))) #s(literal -1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 ky ky))))
#s(approx (* 1/2 (cos (* 2 ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/3 binary64) (*.f64 ky ky) #s(literal -1 binary64)))))
#s(approx (* 1/2 (cos (* 2 ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (-.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky))) #s(literal -1 binary64)))))
#s(approx (cos (* 2 ky)) #s(literal 1 binary64))
#s(approx (cos (* 2 ky)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 ky ky))))
#s(approx (cos (* 2 ky)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2/3 binary64) (*.f64 ky ky) #s(literal -2 binary64)))))
#s(approx (cos (* 2 ky)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (-.f64 #s(literal 2/3 binary64) (*.f64 #s(literal 4/45 binary64) (*.f64 ky ky))) #s(literal -2 binary64)))))
#s(approx (* 2 ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx ky ky)
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (* 1/2 (cos (* 2 ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (cos (* 2 ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (+ (* ky ky) (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 (*.f64 ky ky) (-.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 ky ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) (*.f64 ky ky))))))

eval77.0ms (1.3%)

Memory
18.9MiB live, 106.4MiB allocated; 14ms collecting garbage
Compiler

Compiled 20 478 to 4 218 computations (79.4% saved)

prune76.0ms (1.3%)

Memory
-14.3MiB live, 38.0MiB allocated; 89ms collecting garbage
Pruning

16 alts after pruning (15 fresh and 1 done)

PrunedKeptTotal
New48410494
Fresh257
Picked415
Done000
Total49016506
Accuracy
100.0%
Counts
506 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
91.5%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
70.8%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
35.8%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
88.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
70.8%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))))
70.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
46.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
42.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
82.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
81.8%
(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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
66.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
63.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 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) #s(literal 1/2 binary64))))
66.6%
(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 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #s(literal 1/2 binary64))))
15.7%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
53.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))))
64.3%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
Compiler

Compiled 1 286 to 1 168 computations (9.2% saved)

series166.0ms (2.8%)

Memory
15.5MiB live, 202.5MiB allocated; 25ms collecting garbage
Counts
63 → 470
Calls
Call 1
Inputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(literal 1 binary64)
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
Om
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 binary64) ky)
ky
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))
(*.f64 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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)))
(*.f64 l l)
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))
(*.f64 Om Om)
#s(literal 4 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))
kx
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
Outputs
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin 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 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1/2))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow Om 4))) (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 1))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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/2 (* (/ (+ (* 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/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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* Om (pow l 6))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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/2 (* (/ (+ (* 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/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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* Om (pow l 6))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5)))))))))) Om)))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (pow Om 2)) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))))
#s(approx (* Om Om) #s(hole binary64 (pow Om 2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -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))))) (* -1/2 (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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)))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)) (pow Om 6))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* -1 (* kx (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (- (* 2/3 (* kx (cos (* 1/2 (PI))))) (* -1 (sin (* 1/2 (PI)))))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (* 1/2 (PI))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (cos (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* -1 (* kx (sin (* 1/2 (PI))))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* kx (+ (* -1 (sin (* 1/2 (PI)))) (* -2/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 2 (* kx (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* -2 (* kx (sin (* 1/2 (PI))))) (* 2 (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* 2 (cos (* 1/2 (PI)))) (* kx (+ (* -2 (sin (* 1/2 (PI)))) (* -4/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 2 kx))))
#s(approx kx #s(hole binary64 kx))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 2 kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* kx (+ 2 (* 1/2 (/ (PI) kx))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* -1 (* kx (- (* -1/2 (/ (PI) kx)) 2)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 1))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (* 2 (/ (pow l 2) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow ky 2) (+ (* 2 (/ (pow l 2) (pow Om 2))) (* (pow ky 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))))) (pow Om 2)))))) (* 1/2 (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole 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))))))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (/ (pow ky 2) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (* (pow ky 2) (+ (* -1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (- (* 2/45 (/ (pow ky 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (* (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))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
Calls

12 calls:

TimeVariablePointExpression
25.0ms
Om
@0
((sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (/ (* 2 l) Om) (* 2 l) 2 l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 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)))))))) (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (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/2 (* 1/2 (cos (* 2 ky)))) (* ky ky) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) kx (/ (PI) 2) (PI))
14.0ms
ky
@inf
((sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (/ (* 2 l) Om) (* 2 l) 2 l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 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)))))))) (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (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/2 (* 1/2 (cos (* 2 ky)))) (* ky ky) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) kx (/ (PI) 2) (PI))
14.0ms
l
@inf
((sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (/ (* 2 l) Om) (* 2 l) 2 l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 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)))))))) (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (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/2 (* 1/2 (cos (* 2 ky)))) (* ky ky) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) kx (/ (PI) 2) (PI))
13.0ms
ky
@-inf
((sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (/ (* 2 l) Om) (* 2 l) 2 l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 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)))))))) (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (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/2 (* 1/2 (cos (* 2 ky)))) (* ky ky) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) kx (/ (PI) 2) (PI))
11.0ms
ky
@0
((sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (/ (* 2 l) Om) (* 2 l) 2 l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 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)))))))) (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (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/2 (* 1/2 (cos (* 2 ky)))) (* ky ky) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (* Om Om) 4 (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)))))))) (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) kx (/ (PI) 2) (PI))

rewrite287.0ms (4.8%)

Memory
19.3MiB live, 333.8MiB allocated; 35ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0223845986
0230841677
0887040149
Stop Event
iter-limit
node-limit
iter-limit
Counts
533 → 614
Calls
Call 1
Inputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(literal 1 binary64)
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
Om
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 binary64) ky)
ky
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))
(*.f64 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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)))
(*.f64 l l)
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))
(*.f64 Om Om)
#s(literal 4 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))
kx
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin 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 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1/2))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow Om 4))) (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 1))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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/2 (* (/ (+ (* 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/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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* Om (pow l 6))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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/2 (* (/ (+ (* 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/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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* Om (pow l 6))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* (/ 1 Om) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 ky)))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))) Om)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5)))))))))) Om)))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky)))))) (pow Om 2)) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))))
#s(approx (* Om Om) #s(hole binary64 (pow Om 2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -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))))) (* -1/2 (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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)))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)) (pow Om 6))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* -1 (* kx (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (- (* 2/3 (* kx (cos (* 1/2 (PI))))) (* -1 (sin (* 1/2 (PI)))))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (* 1/2 (PI))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (cos (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* -1 (* kx (sin (* 1/2 (PI))))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* kx (+ (* -1 (sin (* 1/2 (PI)))) (* -2/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 2 (* kx (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* -2 (* kx (sin (* 1/2 (PI))))) (* 2 (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* 2 (cos (* 1/2 (PI)))) (* kx (+ (* -2 (sin (* 1/2 (PI)))) (* -4/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 2 kx))))
#s(approx kx #s(hole binary64 kx))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 2 kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* kx (+ 2 (* 1/2 (/ (PI) kx))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* -1 (* kx (- (* -1/2 (/ (PI) kx)) 2)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (pow ky 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* -1 (pow ky 2)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (+ 1/2 (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 1))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* -2 (pow ky 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2)))))
#s(approx (* 2 ky) #s(hole binary64 (* 2 ky)))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 2 (* (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)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow ky 2) (+ (* 1/2 (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (* 2 (/ (pow l 2) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (+ 1 (* (pow ky 2) (+ (* 2 (/ (pow l 2) (pow Om 2))) (* (pow ky 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))))) (pow Om 2)))))) (* 1/2 (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole binary64 (+ 1 (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(hole 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))))))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (* (pow ky 2) (+ (* -1/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* 2/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/3 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/315 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 2/45 (/ (pow l 2) (pow Om 2))))))) (/ (pow l 2) (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (/ (pow ky 2) (pow Om 2))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (* (pow ky 2) (+ (* -1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (* (pow ky 2) (+ (* (pow ky 2) (- (* 2/45 (/ (pow ky 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) #s(hole binary64 (* (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))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(hole binary64 (* 1/2 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
Outputs
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(literal 1 binary64)
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
#s(literal 2 binary64)
l
Om
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
(sin.f64 (fma.f64 #s(literal 2 binary64) ky (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (*.f64 (cos.f64 ky) (cos.f64 ky)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) ky)))
(cos.f64 (*.f64 #s(literal 2 binary64) ky))
(*.f64 #s(literal 2 binary64) ky)
ky
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))) #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 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))))
#s(literal 1/2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))) (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 ky ky)
(pow.f64 ky #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 ky) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(pow.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 1 binary64)))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64)) #s(literal 1 binary64))
(*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (neg.f64 (*.f64 Om Om)))
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))
(-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (*.f64 Om Om)))
(*.f64 (neg.f64 Om) (neg.f64 Om))
(*.f64 (fabs.f64 Om) (fabs.f64 Om))
(*.f64 Om Om)
(pow.f64 Om #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 Om) #s(literal 2 binary64)))
#s(literal 4 binary64)
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) #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 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 kx) (cos.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) kx) (*.f64 #s(literal 2 binary64) kx)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal 2 binary64) kx) (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) kx) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 2 binary64) kx) (*.f64 #s(literal 2 binary64) kx) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 2 binary64) kx) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) kx) (/.f64 (PI.f64) #s(literal 2 binary64)))
kx
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 Om Om))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
#s(approx (/ (* 2 l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (* 2 l) (*.f64 #s(literal 2 binary64) l))
#s(approx l l)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 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 binary64))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) #s(literal 1 binary64))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) #s(literal 1 binary64))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))
#s(approx (* l l) (*.f64 l l))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/512 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))) (*.f64 (*.f64 (*.f64 l l) l) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) (*.f64 (*.f64 l l) l)))))))
#s(approx (* (/ 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)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) l))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 l (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/512 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) l) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) l) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) l)))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal -1/128 binary64) (/.f64 Om (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om (-.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/512 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 l l) l) #s(literal 1/4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/128 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/4096 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx Om Om)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 2 binary64) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) Om))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) Om))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)))
#s(approx (* Om Om) (*.f64 Om Om))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 kx (-.f64 (*.f64 kx (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 kx (-.f64 (*.f64 kx (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 kx (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -2/3 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal -2 binary64) (*.f64 kx (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -4/3 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx)))
#s(approx kx kx)
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 kx (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) kx)))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -2 binary64) kx))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -2 binary64) kx))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 kx (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) kx)) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 ky ky)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 ky ky)))) #s(literal 1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 ky))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (*.f64 ky ky))))
#s(approx (* 1/2 (cos (* 2 ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 ky ky)) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (*.f64 ky ky)))) #s(literal 1 binary64)))))
#s(approx (cos (* 2 ky)) #s(literal 1 binary64))
#s(approx (cos (* 2 ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (*.f64 ky ky))))
#s(approx (cos (* 2 ky)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 ky ky)) #s(literal 2 binary64)))))
#s(approx (cos (* 2 ky)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (*.f64 ky ky)))) #s(literal 2 binary64)))))
#s(approx (* 2 ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx ky ky)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (* ky ky) (*.f64 ky ky))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 Om Om))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
#s(approx (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (/.f64 (*.f64 ky ky) (*.f64 Om Om)))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 ky ky) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 ky ky) (*.f64 Om Om))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))))
#s(approx (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 ky ky) (*.f64 Om Om)) (*.f64 #s(literal 2/45 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))) (*.f64 #s(literal 1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (* 1/2 (cos (* 2 ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (cos (* 2 ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))

eval93.0ms (1.6%)

Memory
-6.6MiB live, 128.7MiB allocated; 45ms collecting garbage
Compiler

Compiled 26 284 to 4 342 computations (83.5% saved)

prune26.0ms (0.4%)

Memory
-2.1MiB live, 44.1MiB allocated; 5ms collecting garbage
Pruning

17 alts after pruning (13 fresh and 4 done)

PrunedKeptTotal
New5215526
Fresh2810
Picked235
Done011
Total52517542
Accuracy
100.0%
Counts
542 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
88.2%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
91.5%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
70.8%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
35.8%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
94.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
46.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
42.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
82.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
81.8%
(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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
66.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
66.6%
(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 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #s(literal 1/2 binary64))))
23.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
38.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 (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
34.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
15.7%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
53.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))))
64.3%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
Compiler

Compiled 1 307 to 1 207 computations (7.7% saved)

series328.0ms (5.5%)

Memory
-21.8MiB live, 198.9MiB allocated; 227ms collecting garbage
Counts
66 → 483
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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))
(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
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))
(sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))
#s(literal -1 binary64)
(/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))
(*.f64 (*.f64 ky ky) (*.f64 l l))
(*.f64 ky ky)
ky
(*.f64 l l)
(*.f64 Om Om)
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(literal -1/4 binary64)
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(/.f64 Om l)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))
#s(literal 1/4 binary64)
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(sin.f64 ky)
(sin.f64 kx)
Outputs
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) #s(hole binary64 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))
#s(approx (/ (* (* ky ky) (* l l)) (* Om Om)) #s(hole binary64 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
#s(approx (* (* ky ky) (* l l)) #s(hole binary64 (* (pow ky 2) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* 1/2 l) (* -1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))) l)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (/ Om l) #s(hole binary64 (/ Om l)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin 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 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1/2))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 l)) l)))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (* (pow l 2) (+ (* -1 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 1/2))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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/2 (* (/ (+ (* 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/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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 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)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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/2 (* (/ (+ (* 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/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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (/ (+ (* -1 (* (pow ky 2) (pow l 2))) (pow Om 2)) (pow Om 2))))
#s(approx (* Om Om) #s(hole binary64 (pow Om 2)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* Om (- (* 1/2 (/ 1 Om)) (* -1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -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))))) (* -1/2 (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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)))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ 1 Om))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (/ 1 Om))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ 1 Om)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* -1 (* kx (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (- (* 2/3 (* kx (cos (* 1/2 (PI))))) (* -1 (sin (* 1/2 (PI)))))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (* 1/2 (PI))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (cos (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* -1 (* kx (sin (* 1/2 (PI))))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* kx (+ (* -1 (sin (* 1/2 (PI)))) (* -2/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 2 (* kx (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* -2 (* kx (sin (* 1/2 (PI))))) (* 2 (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* 2 (cos (* 1/2 (PI)))) (* kx (+ (* -2 (sin (* 1/2 (PI)))) (* -4/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 2 kx))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* 1/4 (/ Om (* kx l)))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* 1/2 kx) (* -1/4 (/ Om l))) kx)))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* kx (+ 1/2 (* 1/24 (/ (* Om kx) l)))) (* -1/4 (/ Om l))) kx)))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* kx (+ 1/2 (* kx (- (* 7/1440 (/ (* Om (pow kx 2)) l)) (* -1/24 (/ Om l)))))) (* -1/4 (/ Om l))) kx)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (* -1/4 (/ Om (* kx l)))))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (/ (+ (* -1/4 (/ Om l)) (* -1/24 (/ (* Om (pow kx 2)) l))) kx)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (/ (+ (* -1/4 (/ Om l)) (* (pow kx 2) (+ (* -1/24 (/ Om l)) (* -7/1440 (/ (* Om (pow kx 2)) l))))) kx)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (/ (+ (* -1/4 (/ Om l)) (* (pow kx 2) (+ (* -1/24 (/ Om l)) (* (pow kx 2) (+ (* -7/1440 (/ Om l)) (* -31/60480 (/ (* Om (pow kx 2)) l))))))) kx)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ Om (* kx l))))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ (+ (* (pow kx 2) (+ (* 7/360 (/ (* Om (pow kx 2)) l)) (* 1/6 (/ Om l)))) (/ Om l)) kx)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ (+ (* (pow kx 2) (+ (* 1/6 (/ Om l)) (* (pow kx 2) (+ (* 31/15120 (/ (* Om (pow kx 2)) l)) (* 7/360 (/ Om l)))))) (/ Om l)) kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ 1 kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ (+ 1 (* 1/6 (pow kx 2))) kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ (+ 1 (* (pow kx 2) (+ 1/6 (* 7/360 (pow kx 2))))) kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ (+ 1 (* (pow kx 2) (+ 1/6 (* (pow kx 2) (+ 7/360 (* 31/15120 (pow kx 2))))))) kx)))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 kx))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (/ Om (* l (sin ky)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/8 (/ (* Om (pow kx 2)) (* l (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin ky)))) (* (pow kx 2) (+ (* -1/8 (/ Om (* l (pow (sin ky) 3)))) (* 1/8 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) l))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin ky)))) (* (pow kx 2) (+ (* -1/8 (/ Om (* l (pow (sin ky) 3)))) (* (pow kx 2) (+ (* -1/8 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) l)) (* 1/8 (/ (* Om (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))) l))))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin ky)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* -1/2 (/ (* Om (pow kx 2)) (* l (pow (sin ky) 3)))) (/ Om (* l (sin ky))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ Om (* l (pow (sin ky) 3)))) (* 1/2 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) l)))) (/ Om (* l (sin ky))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ Om (* l (pow (sin ky) 3)))) (* (pow kx 2) (+ (* -1/2 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) l)) (* 1/2 (/ (* Om (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))) l)))))) (/ Om (* l (sin ky))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 2 kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* kx (+ 2 (* 1/2 (/ (PI) kx))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (- 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* -1 (* kx (- (* -1/2 (/ (PI) kx)) 2)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/8 (/ (* Om (pow ky 2)) (* l (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin kx)))) (* (pow ky 2) (+ (* -1/8 (/ Om (* l (pow (sin kx) 3)))) (* 1/8 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) l))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin kx)))) (* (pow ky 2) (+ (* -1/8 (/ Om (* l (pow (sin kx) 3)))) (* (pow ky 2) (+ (* -1/8 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) l)) (* 1/8 (/ (* Om (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) l))))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin kx)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* -1/2 (/ (* Om (pow ky 2)) (* l (pow (sin kx) 3)))) (/ Om (* l (sin kx))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ Om (* l (pow (sin kx) 3)))) (* 1/2 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) l)))) (/ Om (* l (sin kx))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ Om (* l (pow (sin kx) 3)))) (* (pow ky 2) (+ (* -1/2 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) l)) (* 1/2 (/ (* Om (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) l)))))) (/ Om (* l (sin kx))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (/ 1 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
Calls

12 calls:

TimeVariablePointExpression
188.0ms
l
@-inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (* 2 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) -1 (/ (* (* ky ky) (* l l)) (* Om Om)) (* (* ky ky) (* l l)) (* ky ky) ky (* l l) (* Om Om) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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)))))))) (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
17.0ms
kx
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (* 2 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) -1 (/ (* (* ky ky) (* l l)) (* Om Om)) (* (* ky ky) (* l l)) (* ky ky) ky (* l l) (* Om Om) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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)))))))) (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
12.0ms
ky
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (* 2 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) -1 (/ (* (* ky ky) (* l l)) (* Om Om)) (* (* ky ky) (* l l)) (* ky ky) ky (* l l) (* Om Om) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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)))))))) (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
10.0ms
l
@0
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (* 2 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) -1 (/ (* (* ky ky) (* l l)) (* Om Om)) (* (* ky ky) (* l l)) (* ky ky) ky (* l l) (* Om Om) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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)))))))) (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
10.0ms
kx
@inf
((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)))))))) (/ 1 2) 1 2 (+ 1 (/ 1 (sqrt (+ 1 (* (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)))))) (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)))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (/ (* 2 l) Om) 2) (/ (* 2 l) Om) (* 2 l) l Om (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) (sin (+ (* 2 kx) (/ (PI) 2))) (+ (* 2 kx) (/ (PI) 2)) (* 2 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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) -1 (/ (* (* ky ky) (* l l)) (* Om Om)) (* (* ky ky) (* l l)) (* ky ky) ky (* l l) (* Om Om) (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)))))))) (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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)))))))) (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))

rewrite346.0ms (5.8%)

Memory
21.1MiB live, 389.5MiB allocated; 44ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0239443679
0246840075
0947338509
Stop Event
iter-limit
node-limit
iter-limit
Counts
549 → 634
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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))
(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
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))
(sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))
#s(literal -1 binary64)
(/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))
(*.f64 (*.f64 ky ky) (*.f64 l l))
(*.f64 ky ky)
ky
(*.f64 l l)
(*.f64 Om Om)
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(literal -1/4 binary64)
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(/.f64 Om l)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))
#s(literal 1/4 binary64)
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(sin.f64 ky)
(sin.f64 kx)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* (sqrt 1/2) (sqrt 2)) (* (pow l 2) (+ (* -1 (/ (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 2) (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2)))))) (sqrt 2))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (pow (/ (* 2 l) Om) 2) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (* 2 l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (* 2 l) #s(hole binary64 (* 2 l)))
#s(approx l #s(hole binary64 l))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4)))) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 64 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))) (* 4 (/ (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2) (pow Om 4))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 1))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) #s(hole binary64 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))
#s(approx (/ (* (* ky ky) (* l l)) (* Om Om)) #s(hole binary64 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
#s(approx (* (* ky ky) (* l l)) #s(hole binary64 (* (pow ky 2) (pow l 2))))
#s(approx (* l l) #s(hole binary64 (pow l 2)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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 (/ (* (+ (* -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/2 (* 1/2 (cos (* 2 kx))))) (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))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* 1/2 l) (* -1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))) l)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))
#s(approx (/ Om l) #s(hole binary64 (/ Om l)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin 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 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -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/4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1/2))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (* (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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 1))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 1))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (/ (+ (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 l)) l)))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 5))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 5))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (* (pow l 2) (+ (* -1 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 1/2))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 1/2))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (/ (+ (* -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/2 (* (/ (+ (* 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/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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (/ (+ (* -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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* 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)))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/4 (* (/ (* Om (sqrt 1/2)) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky))))))))) l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (* Om (pow l 4))) (sqrt (- 1/2 (* 1/2 (cos (* 2 ky))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 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)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 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)))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* -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/2 (* (/ (+ (* 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/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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 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))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx Om #s(hole binary64 Om))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 5))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (/ (+ (* -1 (* (pow ky 2) (pow l 2))) (pow Om 2)) (pow Om 2))))
#s(approx (* Om Om) #s(hole binary64 (pow Om 2)))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 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))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (/ (+ (* 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)))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (pow Om 2)) (pow Om 2))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (* -1 (/ (* (pow l 2) (* (sqrt 1/2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (* (pow Om 2) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2)))) (* (pow Om 4) (sqrt 2)))) (+ (* 1/2 (/ (* (sqrt 1/2) (- (* -1/2 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1 (/ (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))))) (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow (sqrt 2) 2))))) (pow (sqrt 2) 2))))) (* (pow Om 6) (sqrt 2)))) (* (sqrt 1/2) (sqrt 2)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 2 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2))) (* 4 (* (pow l 4) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 2)))) (- 1/2 (* 1/2 (cos (* 2 ky))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 ky)))) 3)))) (pow Om 6))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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) (* (+ (* -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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))))) (* 64 (* (pow l 6) (pow (- 1/2 (* 1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* Om (- (* 1/2 (/ 1 Om)) (* -1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* 1/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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -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))))) (* -1/2 (* (pow l 2) (* (+ (pow (sin kx) 2) (pow (sin ky) 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))))) (* 1/4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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)))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1/2 (+ (* -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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ 1 Om))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (/ 1 Om))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 1/2 (/ 1 Om)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin ky) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow kx 2) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (pow (sin ky) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3)))) (pow (sin ky) 2))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* -1 (* kx (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (sin (* 1/2 (PI)))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- (+ 1/2 (* kx (- (* kx (- (* 2/3 (* kx (cos (* 1/2 (PI))))) (* -1 (sin (* 1/2 (PI)))))) (cos (* 1/2 (PI)))))) (* 1/2 (sin (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (* 1/2 (PI))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (cos (* 1/2 (PI)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* -1 (* kx (sin (* 1/2 (PI))))))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (sin (* 1/2 (PI)))) (* kx (+ (cos (* 1/2 (PI))) (* kx (+ (* -1 (sin (* 1/2 (PI)))) (* -2/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* 2 (* kx (cos (* 1/2 (PI))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* -2 (* kx (sin (* 1/2 (PI))))) (* 2 (cos (* 1/2 (PI)))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* kx (+ (* 2 (cos (* 1/2 (PI)))) (* kx (+ (* -2 (sin (* 1/2 (PI)))) (* -4/3 (* kx (cos (* 1/2 (PI))))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* 2 kx))))
#s(approx (* 2 kx) #s(hole binary64 (* 2 kx)))
#s(approx kx #s(hole binary64 kx))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (* 1/4 (/ Om (* kx l)))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* 1/2 kx) (* -1/4 (/ Om l))) kx)))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* kx (+ 1/2 (* 1/24 (/ (* Om kx) l)))) (* -1/4 (/ Om l))) kx)))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (- (* kx (+ 1/2 (* kx (- (* 7/1440 (/ (* Om (pow kx 2)) l)) (* -1/24 (/ Om l)))))) (* -1/4 (/ Om l))) kx)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (* -1/4 (/ Om (* kx l)))))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (/ (+ (* -1/4 (/ Om l)) (* -1/24 (/ (* Om (pow kx 2)) l))) kx)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (/ (+ (* -1/4 (/ Om l)) (* (pow kx 2) (+ (* -1/24 (/ Om l)) (* -7/1440 (/ (* Om (pow kx 2)) l))))) kx)))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) #s(hole binary64 (/ (+ (* -1/4 (/ Om l)) (* (pow kx 2) (+ (* -1/24 (/ Om l)) (* (pow kx 2) (+ (* -7/1440 (/ Om l)) (* -31/60480 (/ (* Om (pow kx 2)) l))))))) kx)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ Om (* kx l))))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ (+ (* (pow kx 2) (+ (* 7/360 (/ (* Om (pow kx 2)) l)) (* 1/6 (/ Om l)))) (/ Om l)) kx)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) #s(hole binary64 (/ (+ (* (pow kx 2) (+ (* 1/6 (/ Om l)) (* (pow kx 2) (+ (* 31/15120 (/ (* Om (pow kx 2)) l)) (* 7/360 (/ Om l)))))) (/ Om l)) kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ 1 kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ (+ 1 (* 1/6 (pow kx 2))) kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ (+ 1 (* (pow kx 2) (+ 1/6 (* 7/360 (pow kx 2))))) kx)))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (/ (+ 1 (* (pow kx 2) (+ 1/6 (* (pow kx 2) (+ 7/360 (* 31/15120 (pow kx 2))))))) kx)))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 kx))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (pow kx 2)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* -1 (pow kx 2)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (+ 1/2 (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 1))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* -2 (pow kx 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole 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))))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (/ Om (* l (sin ky)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/8 (/ (* Om (pow kx 2)) (* l (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin ky)))) (* (pow kx 2) (+ (* -1/8 (/ Om (* l (pow (sin ky) 3)))) (* 1/8 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) l))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin ky)))) (* (pow kx 2) (+ (* -1/8 (/ Om (* l (pow (sin ky) 3)))) (* (pow kx 2) (+ (* -1/8 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) l)) (* 1/8 (/ (* Om (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))) l))))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin ky)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* -1/2 (/ (* Om (pow kx 2)) (* l (pow (sin ky) 3)))) (/ Om (* l (sin ky))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ Om (* l (pow (sin ky) 3)))) (* 1/2 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) l)))) (/ Om (* l (sin ky))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow kx 2) (+ (* -1/2 (/ Om (* l (pow (sin ky) 3)))) (* (pow kx 2) (+ (* -1/2 (/ (* Om (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) l)) (* 1/2 (/ (* Om (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))) l)))))) (/ Om (* l (sin ky))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (/ 1 (sin ky))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* -1/2 (/ (pow kx 2) (pow (sin ky) 3))) (/ 1 (sin ky)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow kx 2) (- (* 1/2 (* (pow kx 2) (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow kx 2) (- (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (* (sin ky) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))) (pow (sin ky) 2))) (+ (* 2/45 (/ 1 (pow (sin ky) 4))) (+ (* 2/3 (/ 1 (pow (sin ky) 6))) (/ 1 (pow (sin ky) 8)))))))) (* 1/2 (* (sin ky) (+ (* 1/3 (/ 1 (pow (sin ky) 4))) (* 3/4 (/ 1 (pow (sin ky) 6)))))))) (* 1/2 (/ 1 (pow (sin ky) 3))))) (/ 1 (sin ky)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sin ky)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* 1/2 (/ (pow kx 2) (sin ky))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin ky) (* (pow kx 2) (+ (* (pow kx 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2))))) (sin ky))))) (* 1/2 (/ 1 (sin ky))))))))
#s(approx (sin kx) #s(hole binary64 kx))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* -1/6 (pow kx 2))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* 1/120 (pow kx 2)) 1/6))))))
#s(approx (sin kx) #s(hole binary64 (* kx (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 1/120 (* -1/5040 (pow kx 2)))) 1/6))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow (sin kx) 2) (pow (sin ky) 2))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (+ (* 1/2 (PI)) (* 2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* 2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* 2 kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* kx (+ 2 (* 1/2 (/ (PI) kx))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (- 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) #s(hole binary64 (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx))))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(hole binary64 (* 1/2 (cos (* 2 kx)))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (cos (* 2 kx))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (sin kx) #s(hole binary64 (sin kx)))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) #s(hole binary64 (- 1/2 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx)))))))
#s(approx (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2)))) #s(hole binary64 (* 1/2 (sin (- (* 1/2 (PI)) (* -2 kx))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(hole binary64 (sin (- (* 1/2 (PI)) (* -2 kx)))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) #s(hole binary64 (* -1 (* kx (- (* -1/2 (/ (PI) kx)) 2)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole 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))))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole 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))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ 1 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (pow (sin kx) 2)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (pow ky 2) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (pow (sin kx) 2))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(hole binary64 (+ (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (pow (sin kx) 2))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole 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)))))))))))))
#s(approx (* ky ky) #s(hole binary64 (pow ky 2)))
#s(approx ky #s(hole binary64 ky))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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) (- (* -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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (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 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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) (- (* -1/4 (* (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/2 (* (/ (* (pow l 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 l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (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/2 (* 1/2 (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/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (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)))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 (+ (* 1/2 (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))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(hole 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))))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(hole 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)))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(hole 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)))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) #s(hole binary64 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (* 1/4 (/ Om (* l (sin kx)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1/8 (/ (* Om (pow ky 2)) (* l (pow (sin kx) 3)))) (* 1/4 (/ Om (* l (sin kx))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin kx)))) (* (pow ky 2) (+ (* -1/8 (/ Om (* l (pow (sin kx) 3)))) (* 1/8 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) l))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 (+ 1/2 (+ (* 1/4 (/ Om (* l (sin kx)))) (* (pow ky 2) (+ (* -1/8 (/ Om (* l (pow (sin kx) 3)))) (* (pow ky 2) (+ (* -1/8 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) l)) (* 1/8 (/ (* Om (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) l))))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin kx)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* -1/2 (/ (* Om (pow ky 2)) (* l (pow (sin kx) 3)))) (/ Om (* l (sin kx))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ Om (* l (pow (sin kx) 3)))) (* 1/2 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) l)))) (/ Om (* l (sin kx))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (+ (* (pow ky 2) (+ (* -1/2 (/ Om (* l (pow (sin kx) 3)))) (* (pow ky 2) (+ (* -1/2 (/ (* Om (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) l)) (* 1/2 (/ (* Om (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))) l)))))) (/ Om (* l (sin kx))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (/ 1 (sin kx))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* -1/2 (/ (pow ky 2) (pow (sin kx) 3))) (/ 1 (sin kx)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow ky 2) (- (* 1/2 (* (pow ky 2) (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/2 (* (pow ky 2) (* (sin kx) (+ (* -1/2 (/ (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))) (pow (sin kx) 2))) (+ (* 2/45 (/ 1 (pow (sin kx) 4))) (+ (* 2/3 (/ 1 (pow (sin kx) 6))) (/ 1 (pow (sin kx) 8)))))))) (* 1/2 (* (sin kx) (+ (* 1/3 (/ 1 (pow (sin kx) 4))) (* 3/4 (/ 1 (pow (sin kx) 6)))))))) (* 1/2 (/ 1 (pow (sin kx) 3))))) (/ 1 (sin kx)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sin kx)))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* 1/2 (/ (pow ky 2) (sin kx))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (+ (sin kx) (* (pow ky 2) (+ (* (pow ky 2) (+ (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2))))) (sin kx))))) (* 1/2 (/ 1 (sin kx))))))))
#s(approx (sin ky) #s(hole binary64 ky))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* -1/6 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* 1/120 (pow ky 2)) 1/6))))))
#s(approx (sin ky) #s(hole binary64 (* ky (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 1/120 (* -1/5040 (pow ky 2)))) 1/6))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(hole binary64 (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(hole binary64 (* (pow ky 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (/ 1 (pow ky 2))))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
Outputs
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))) #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 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(literal 1/2 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))) (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
l
Om
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))))
(sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
kx
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))
#s(literal -1 binary64)
(*.f64 (/.f64 (*.f64 ky ky) Om) (/.f64 (*.f64 l l) Om))
(/.f64 (neg.f64 (*.f64 (*.f64 ky ky) (*.f64 l l))) (neg.f64 (*.f64 Om Om)))
(/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))
(*.f64 (*.f64 ky ky) (*.f64 l l))
(pow.f64 (*.f64 ky l) #s(literal 2 binary64))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 ky ky)
(pow.f64 ky #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
ky
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 l l)
(pow.f64 l #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (neg.f64 Om) (neg.f64 Om))
(*.f64 (fabs.f64 Om) (fabs.f64 Om))
(*.f64 Om Om)
(pow.f64 Om #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 Om) #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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(literal -1/4 binary64)
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(/.f64 (neg.f64 Om) (neg.f64 l))
(/.f64 Om l)
(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) kx))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(sqrt.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) kx))))))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 1/2 binary64))
(sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (*.f64 #s(literal 2 binary64) kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 (*.f64 (cos.f64 kx) (cos.f64 kx)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(cos.f64 (neg.f64 (*.f64 #s(literal 2 binary64) kx)))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 2 binary64) kx)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 #s(literal 2 binary64) kx)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
(pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (neg.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) (fabs.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) (*.f64 #s(literal 2 binary64) l)) (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))))) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) #s(literal 1/2 binary64)))))
(fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))
(+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))) #s(literal 1/2 binary64))
#s(literal 1/4 binary64)
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
(/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
(pow.f64 (hypot.f64 (sin.f64 ky) (sin.f64 kx)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (hypot.f64 (sin.f64 ky) (sin.f64 kx))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))
(pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (sin.f64 kx))
(hypot.f64 (sin.f64 ky) (neg.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 (sin.f64 kx)))
(hypot.f64 (sin.f64 ky) (sin.f64 kx))
(sin.f64 ky)
(sin.f64 kx)
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))))) (sqrt.f64 #s(literal 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 binary64))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
#s(approx (/ (* 2 l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (* 2 l) (*.f64 #s(literal 2 binary64) l))
#s(approx l l)
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) #s(literal 1 binary64))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (* -1 (/ (* (* ky ky) (* l l)) (* Om Om))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))
#s(approx (/ (* (* ky ky) (* l l)) (* Om Om)) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))
#s(approx (* (* ky ky) (* l l)) (*.f64 (*.f64 ky ky) (*.f64 l l)))
#s(approx (* l l) (*.f64 l l))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) l) (*.f64 #s(literal -1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))
#s(approx (/ Om l) (/.f64 Om l))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 Om Om))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (fma.f64 #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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) #s(literal 1 binary64))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) l)) l))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) (*.f64 (*.f64 l l) l)))))))
#s(approx (* (/ 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)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ky ky) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(literal 1/2 binary64))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/512 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))) (*.f64 (*.f64 (*.f64 l l) l) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 5 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (*.f64 (*.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 l l)))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 l (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) l) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) l) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))) l))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) l))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 Om (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 l (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/512 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/128 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) l) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (*.f64 Om (pow.f64 l #s(literal 4 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (fma.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 8 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 Om (pow.f64 l #s(literal 6 binary64)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) l)))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 l Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 #s(literal -1 binary64) (*.f64 l (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (fma.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om (*.f64 l l)) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 Om (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx Om Om)
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal -5 binary64)))))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx (* Om Om) (*.f64 Om Om))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal -5 binary64)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal -1/128 binary64) (/.f64 Om (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 Om (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om (-.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))) (*.f64 #s(literal -1/512 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 l l) l) #s(literal 1/4 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/128 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 Om (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/4096 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/512 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (*.f64 Om (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/16 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -5/2048 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 7 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -7 binary64)))) (*.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 Om Om) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))) Om))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 l (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/64 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 l l) l)) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/512 binary64) (*.f64 (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 Om Om)))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (sqrt.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) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (pow.f64 Om #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (*.f64 Om (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 l l) (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 l l) (*.f64 (fma.f64 #s(literal -16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (*.f64 #s(literal 64 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) Om)))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (*.f64 Om (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) Om)))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (*.f64 #s(literal -1 binary64) (*.f64 Om (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) Om))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 kx (-.f64 (*.f64 kx (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 kx (-.f64 (*.f64 kx (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* 1/2 (cos (* 2 kx))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (cos (* 2 kx))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 kx (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* 1/2 (cos (* 2 kx))) (fma.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal -1 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -2/3 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal -2 binary64) (*.f64 kx (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 kx (fma.f64 #s(literal -2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -4/3 binary64) (*.f64 kx (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx)))
#s(approx (* 2 kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx kx kx)
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 kx l))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) kx) (*.f64 #s(literal -1/4 binary64) (/.f64 Om l))) kx))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (/.f64 (-.f64 (*.f64 kx (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 Om kx) l)))) (*.f64 #s(literal -1/4 binary64) (/.f64 Om l))) kx))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (/.f64 (-.f64 (*.f64 kx (+.f64 #s(literal 1/2 binary64) (*.f64 kx (-.f64 (*.f64 #s(literal 7/1440 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l)) (*.f64 #s(literal -1/24 binary64) (/.f64 Om l)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 Om l))) kx))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 Om (*.f64 kx l))))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 Om l) (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l))) kx))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 Om l) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/24 binary64) (/.f64 Om l) (*.f64 #s(literal -7/1440 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l))))) kx))
#s(approx (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 Om l) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/24 binary64) (/.f64 Om l) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -7/1440 binary64) (/.f64 Om l) (*.f64 #s(literal -31/60480 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l))))))) kx))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/.f64 Om (*.f64 kx l)))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l) (/.f64 Om l)) kx))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/.f64 (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 7/360 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l) (*.f64 #s(literal 1/6 binary64) (/.f64 Om l))) (/.f64 Om l)) kx))
#s(approx (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))) (/.f64 (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/6 binary64) (/.f64 Om l) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 31/15120 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) l) (*.f64 #s(literal 7/360 binary64) (/.f64 Om l))))) (/.f64 Om l)) kx))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (/.f64 #s(literal 1 binary64) kx))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 kx kx))) kx))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 7/360 binary64) (*.f64 kx kx))))) kx))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 7/360 binary64) (*.f64 #s(literal 31/15120 binary64) (*.f64 kx kx))))))) kx))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) kx)
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 kx kx)))) #s(literal 1/6 binary64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 kx kx)))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 kx kx)) #s(literal 1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 kx kx)))) #s(literal 1/3 binary64))))))
#s(approx (* 1/2 (cos (* 2 kx))) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (*.f64 kx kx))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 kx kx)) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (*.f64 kx kx)))) #s(literal 1 binary64)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) #s(literal 1 binary64))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (*.f64 kx kx))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 2/3 binary64) (*.f64 kx kx)) #s(literal 2 binary64)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (*.f64 kx kx)))) #s(literal 2 binary64)))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 ky))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) (*.f64 l (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 ky)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 ky))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/8 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) l)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 ky))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/8 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 Om (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) l)))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 Om (*.f64 kx kx)) (*.f64 l (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (/.f64 Om (*.f64 l (sin.f64 ky)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) l))) (/.f64 Om (*.f64 l (sin.f64 ky)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 ky) #s(literal 3 binary64)))) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64)))))))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))) l))))) (/.f64 Om (*.f64 l (sin.f64 ky)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 kx kx) (pow.f64 (sin.f64 ky) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 kx kx) (*.f64 (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)) (pow.f64 (sin.f64 ky) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 ky) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 ky) #s(literal -6 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 ky) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 ky))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sin.f64 ky) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 kx kx) (sin.f64 ky)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sin.f64 ky) (*.f64 (*.f64 kx kx) (fma.f64 (*.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))) (sin.f64 ky)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 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) ky))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))) (sin.f64 ky)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 ky)))))))
#s(approx (sin kx) kx)
#s(approx (sin kx) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 kx kx)))))
#s(approx (sin kx) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 kx kx)) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (*.f64 kx (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 kx kx) (-.f64 (*.f64 (*.f64 kx kx) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 kx kx)))) #s(literal 1/6 binary64))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 2 binary64) kx))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 kx (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) kx)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (- 1/2 (* -1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))
#s(approx (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))) (*.f64 Om Om))))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -2 binary64) kx))))))
#s(approx (* 1/2 (cos (* 2 kx))) (*.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (sin (+ (* 2 kx) (/ (PI) 2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal -2 binary64) kx))))
#s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 kx (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) kx)) #s(literal 2 binary64)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 (*.f64 ky ky) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 ky ky)) #s(literal 1/3 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 Om Om)) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (*.f64 Om Om)) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))))
#s(approx (* ky ky) (*.f64 ky ky))
#s(approx ky ky)
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))))
#s(approx (sqrt (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (+ 1/2 (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (* 1/2 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal -3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (pow.f64 (*.f64 Om (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) #s(literal 2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (*.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))) #s(literal 3 binary64))))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))
#s(approx (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (*.f64 (*.f64 Om Om) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))))))
#s(approx (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om))))))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)))))))
#s(approx (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 Om (*.f64 ky ky)) (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/8 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) l)))))))
#s(approx (+ (* 1/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l (sin.f64 kx))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/8 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64)))))))) l) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 Om (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) l)))))))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 Om (*.f64 ky ky)) (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (/.f64 Om (*.f64 l (sin.f64 kx)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) l))) (/.f64 Om (*.f64 l (sin.f64 kx)))))
#s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 Om (*.f64 l (pow.f64 (sin.f64 kx) #s(literal 3 binary64)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 Om (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64)))))))) l) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 Om (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))) l))))) (/.f64 Om (*.f64 l (sin.f64 kx)))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ky ky) (pow.f64 (sin.f64 kx) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
#s(approx (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ky ky) (*.f64 (sin.f64 kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (fma.f64 #s(literal 2/45 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (fma.f64 #s(literal 2/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)) (pow.f64 (sin.f64 kx) #s(literal -8 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 kx) (fma.f64 #s(literal 1/3 binary64) (pow.f64 (sin.f64 kx) #s(literal -4 binary64)) (*.f64 #s(literal 3/4 binary64) (pow.f64 (sin.f64 kx) #s(literal -6 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (sin.f64 kx) #s(literal -3 binary64)))) (/.f64 #s(literal 1 binary64) (sin.f64 kx))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin.f64 kx))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sin.f64 kx) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ky ky) (sin.f64 kx)))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sin.f64 kx) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 kx)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
#s(approx (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (+.f64 (sin.f64 kx) (*.f64 (*.f64 ky ky) (fma.f64 (*.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 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) kx))))))) (sin.f64 kx)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 ky ky) (-.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 1/4 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) kx))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (sin.f64 kx)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))))))
#s(approx (sin ky) ky)
#s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 ky ky)))))
#s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 ky ky)) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (*.f64 ky (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 ky ky) (-.f64 (*.f64 (*.f64 ky ky) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 ky ky)))) #s(literal 1/6 binary64))))))
#s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))) (*.f64 Om Om)))))))))
#s(approx (+ 1 (* -1 (/ (* (* ky ky) (* l l)) (* Om Om)))) (*.f64 (*.f64 ky ky) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (*.f64 ky ky)))))
#s(approx (sin ky) (sin.f64 ky))

eval123.0ms (2.1%)

Memory
12.0MiB live, 105.6MiB allocated; 19ms collecting garbage
Compiler

Compiled 25 140 to 4 461 computations (82.3% saved)

prune40.0ms (0.7%)

Memory
-21.9MiB live, 66.3MiB allocated; 10ms collecting garbage
Pruning

19 alts after pruning (13 fresh and 6 done)

PrunedKeptTotal
New5446550
Fresh178
Picked325
Done044
Total54819567
Accuracy
100.0%
Counts
567 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
88.2%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
91.5%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
70.8%
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
35.8%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
94.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 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
46.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
45.1%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky)))) #s(literal 1/2 binary64))))
33.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 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))))
42.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
82.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
81.8%
(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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
66.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
23.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
38.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 (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
34.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))))
16.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
27.1%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.f64 kx kx))))))))))
53.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) #s(literal 1/2 binary64))))
64.3%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
Compiler

Compiled 1 617 to 1 102 computations (31.8% saved)

regimes203.0ms (3.4%)

Memory
0.6MiB live, 334.5MiB allocated; 98ms collecting garbage
Counts
34 → 2
Calls
Call 1
Inputs
#s(approx (sqrt (* (/ 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 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)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky)))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))))))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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:

25.0ms
Om
18.0ms
(sin.f64 kx)
16.0ms
(*.f64 #s(literal 2 binary64) l)
15.0ms
(sin.f64 ky)
11.0ms
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
Results
AccuracySegmentsBranch
98.0%1(sin.f64 ky)
98.0%1(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
98.0%1(sin.f64 kx)
98.0%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
98.0%1(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
98.0%1(*.f64 #s(literal 2 binary64) l)
99.7%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
99.7%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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.0%1l
98.0%1Om
98.0%1kx
98.0%1ky
Compiler

Compiled 199 to 198 computations (0.5% saved)

regimes248.0ms (4.2%)

Memory
2.6MiB live, 235.8MiB allocated; 41ms collecting garbage
Counts
31 → 2
Calls
Call 1
Inputs
#s(approx (sqrt (* (/ 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 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)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky)))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 l l) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
Outputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 #s(literal 1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
Calls

19 calls:

57.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))))))))
23.0ms
ky
13.0ms
l
11.0ms
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
8.0ms
(sin.f64 kx)
Results
AccuracySegmentsBranch
98.2%3(sin.f64 ky)
97.5%2(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
94.0%1(sin.f64 kx)
94.0%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
97.5%2(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
94.0%1(*.f64 #s(literal 2 binary64) l)
94.0%1l
95.7%2Om
94.0%1kx
97.5%2ky
97.7%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
97.7%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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))))
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(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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)))))))
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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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(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 199 to 198 computations (0.5% saved)

regimes19.0ms (0.3%)

Memory
36.5MiB live, 36.5MiB allocated; 0ms collecting garbage
Counts
27 → 2
Calls
Call 1
Inputs
#s(approx (sqrt (* (/ 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 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)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky)))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 #s(approx (+ (* 2 kx) (/ (PI) 2)) (*.f64 #s(literal 2 binary64) kx)))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 kx kx (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (fma.f64 ky ky (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
(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)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.f64) #s(literal 2 binary64))))))))))))))
Outputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) #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
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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)))))
Results
AccuracySegmentsBranch
98.8%2(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
98.8%2(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
98.8%2(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
Compiler

Compiled 56 to 47 computations (16.1% saved)

regimes34.0ms (0.6%)

Memory
-32.2MiB live, 26.7MiB allocated; 6ms collecting garbage
Counts
18 → 2
Calls
Call 1
Inputs
#s(approx (sqrt (* (/ 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 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)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky)))) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) (*.f64 ky ky))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) #s(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (*.f64 Om Om))) #s(literal 4 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)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) (/.f64 (*.f64 #s(literal 2 binary64) l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
Outputs
#s(approx (sqrt (* (/ 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)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 ky)))) #s(literal 1/2 binary64))))
Calls

3 calls:

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

regimes33.0ms (0.6%)

Memory
30.2MiB live, 75.5MiB allocated; 4ms collecting garbage
Counts
8 → 2
Calls
Call 1
Inputs
#s(approx (sqrt (* (/ 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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)))) 1/2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (- 1/2 (* 1/2 (sin (+ (* 2 kx) (/ (PI) 2))))) (*.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(approx (* (+ 1 (/ 1 (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 ky)))) (* Om Om))) 4) 1)))) 1/2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ky ky) (*.f64 l l)) (*.f64 Om Om)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ (* (* (* l l) (/ (- 1/2 (* 1/2 (cos (* 2 kx)))) (* Om Om))) 4) 1)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx kx) (*.f64 l l)) (*.f64 Om Om))))))) #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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (*.f64 kx kx)) (*.f64 Om Om))) #s(literal 4 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)))))))) (fma.f64 #s(literal 1/4 binary64) #s(approx (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/.f64 Om (*.f64 l (sin.f64 kx)))) #s(literal 1/2 binary64))))
Outputs
#s(approx (sqrt (* (/ 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

12 calls:

5.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))))))))
3.0ms
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
3.0ms
ky
3.0ms
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
2.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
Results
AccuracySegmentsBranch
71.0%3(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
71.0%3(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
70.1%2ky
94.1%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
94.1%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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)))))))
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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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(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.5%2(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
97.5%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.5%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))))))
Compiler

Compiled 185 to 163 computations (11.9% saved)

regimes32.0ms (0.5%)

Memory
-36.6MiB live, 54.8MiB allocated; 7ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
Outputs
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(literal 1 binary64))
Calls

19 calls:

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

Compiled 199 to 198 computations (0.5% saved)

bsearch1.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.0
NaN
Compiler

Compiled 32 to 29 computations (9.4% saved)

bsearch1.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
37.82549483047921
166.27249653883047
Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
10698190191757.766
120173078971243570.0
Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.0861716933829941
37.82549483047921
Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.0861716933829941
37.82549483047921
Compiler

Compiled 32 to 31 computations (3.1% saved)

derivations184.0ms (3.1%)

Memory
17.2MiB live, 166.6MiB allocated; 25ms collecting garbage
Stop Event
fuel
Compiler

Compiled 161 to 89 computations (44.7% saved)

preprocess174.0ms (2.9%)

Memory
-18.9MiB live, 313.9MiB allocated; 38ms collecting garbage
Remove

(sort kx ky)

(abs ky)

(abs kx)

(abs Om)

(abs l)

Compiler

Compiled 5 402 to 4 077 computations (24.5% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...