Metrics for Toniolo and Linder, Equation (3a)

start0.0ms (0%)

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

analyze150.0ms (2.5%)

Memory

42.8MiB live, 231.4MiB allocated; 53ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 31 to 24 computations (22.6% saved)

sample2.0s (32.8%)

Memory

20.6MiB live, 2 774.5MiB allocated; 511ms collecting garbage

Samples

1.5s

8 256×

valid

Precisions

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

ival-sin: 439.0ms (35.9% of total)

ival-pow2: 347.0ms (28.3% of total)

ival-sqrt: 131.0ms (10.7% of total)

ival-mult!: 131.0ms (10.7% of total)

ival-div!: 116.0ms (9.5% of total)

ival-add!: 58.0ms (4.7% of total)

adjust: 2.0ms (0.2% of total)

Bogosity

preprocess41.0ms (0.7%)

Memory

-20.6MiB live, 26.2MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	134	413
1	386	379
2	1487	379
3	5782	379

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

98.8%

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

Symmetry

(abs l)

(abs Om)

(abs kx)

(abs ky)

(sort kx ky)

Compiler

Compiled 58 to 44 computations (24.1% saved)

series125.0ms (2.1%)

Memory

-3.0MiB live, 249.6MiB allocated; 41ms 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:

Time	Variable		Point	Expression
22.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)
19.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)
12.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)
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)
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)

rewrite257.0ms (4.3%)

Memory

43.4MiB live, 365.1MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1083	17577
0	1112	15888
1	6718	15888
0	8063	14831

Stop Event

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

Counts

204 → 258

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

eval43.0ms (0.7%)

Memory: -13.8MiB live, 86.4MiB allocated; 12ms collecting garbage
Compiler: Compiled 11 940 to 2 067 computations (82.7% saved)

prune13.0ms (0.2%)

Memory

-19.7MiB live, 27.2MiB allocated; 2ms collecting garbage

Pruning

10 alts after pruning (10 fresh and 0 done)

	Pruned	Kept	Total
New	237	10	247
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	238	10	248

Accuracy

100.0%

Counts

248 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
	91.6%	(.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))))
▶	92.4%	(sqrt.f64 (+.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))))
	92.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)) #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))))))))))))
▶	71.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)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
▶	48.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
	83.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))))
▶	64.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 #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))))
	55.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(literal 1/2 binary64)))
	45.3%	#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))))
▶	63.2%	#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 640 to 610 computations (4.7% saved)

series1.1s (18.4%)

Memory

-102.1MiB live, 552.6MiB allocated; 1.4s collecting garbage

Counts

60 → 497

Calls

Call 1

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

Calls

12 calls:

Time	Variable		Point	Expression
72.0ms	l	@	-inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 ky (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (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)) (* 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 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) (+ (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)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
61.0ms	kx	@	0	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 ky (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (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)) (* 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 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) (+ (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)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
26.0ms	kx	@	-inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 ky (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (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)) (* 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 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) (+ (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)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
24.0ms	ky	@	0	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 ky (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (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)) (* 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 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) (+ (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)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))
24.0ms	ky	@	-inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))) (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) 2 ky (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (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)) (* 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 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) (+ (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)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) (sin kx))

rewrite367.0ms (6.1%)

Memory

-17.9MiB live, 456.8MiB allocated; 109ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2824	49391
0	2906	43059
0	9436	41581

Stop Event

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

Counts

557 → 637

Calls

Call 1

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

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

eval104.0ms (1.7%)

Memory: -3.0MiB live, 179.6MiB allocated; 23ms collecting garbage
Compiler: Compiled 30 712 to 5 285 computations (82.8% saved)

prune19.0ms (0.3%)

Memory

43.2MiB live, 43.2MiB allocated; 0ms collecting garbage

Pruning

13 alts after pruning (11 fresh and 2 done)

	Pruned	Kept	Total
New	639	10	649
Fresh	4	1	5
Picked	3	2	5
Done	0	0	0
Total	646	13	659

Accuracy

100.0%

Counts

659 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	70.3%	(.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))))))))))))
▶	92.4%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
▶	92.1%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
	71.2%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
▶	55.7%	(sqrt.f64 #s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64)))
	48.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
▶	49.1%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))))
▶	47.0%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
	34.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
✓	64.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 #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))))
	18.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 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))))))))))))
	45.3%	#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))))
✓	63.2%	#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 874 to 834 computations (4.6% saved)

series115.0ms (1.9%)

Memory

-9.2MiB live, 186.7MiB allocated; 15ms collecting garbage

Counts

50 → 305

Calls

Call 1

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

Outputs
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 1/2))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ (+ l l) Om) (/ (+ l l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (+ l l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (+ l 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/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 (/ Om (* l (sin ky))) #s(hole binary64 (/ Om (* l (sin ky)))))
#s(approx (* l (sin ky)) #s(hole binary64 (* l (sin ky))))
#s(approx (/ Om l) #s(hole binary64 (/ Om l)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))))
#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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
#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/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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky)))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 ky))) (* (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 (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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (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 (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 (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx)))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1))))))
#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/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 (/ Om (* l (sin ky))) #s(hole binary64 (/ Om (* ky l))))
#s(approx (/ Om (* l (sin ky))) #s(hole binary64 (/ (+ (* 1/6 (/ (* Om (pow ky 2)) l)) (/ Om l)) ky)))
#s(approx (/ Om (* l (sin ky))) #s(hole binary64 (/ (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) ky)))
#s(approx (/ Om (* l (sin ky))) #s(hole binary64 (/ (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) ky)))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky l)))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky (+ l (* -1/6 (* (pow ky 2) l))))))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky (+ l (* (pow ky 2) (+ (* -1/6 l) (* 1/120 (* (pow ky 2) l))))))))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky (+ l (* (pow ky 2) (+ (* -1/6 l) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) l)) (* 1/120 l)))))))))
#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 (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 (- 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 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))

Calls

12 calls:

Time	Variable		Point	Expression
12.0ms	l	@	0	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (cos (* 2 kx)) (* 2 kx) 2 kx (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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/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)))))) (/ Om (* l (sin ky))) (* l (sin ky)) (sin 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/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))
9.0ms	ky	@	-inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (cos (* 2 kx)) (* 2 kx) 2 kx (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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/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)))))) (/ Om (* l (sin ky))) (* l (sin ky)) (sin 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/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))
8.0ms	ky	@	0	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (cos (* 2 kx)) (* 2 kx) 2 kx (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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/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)))))) (/ Om (* l (sin ky))) (* l (sin ky)) (sin 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/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))
8.0ms	kx	@	inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (cos (* 2 kx)) (* 2 kx) 2 kx (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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/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)))))) (/ Om (* l (sin ky))) (* l (sin ky)) (sin 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/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))
7.0ms	ky	@	inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (cos (* 2 kx)) (* 2 kx) 2 kx (* 1/2 (cos (* 2 ky))) (cos (* 2 ky)) (* 2 ky) ky (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l Om (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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/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)))))) (/ Om (* l (sin ky))) (* l (sin ky)) (sin 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/4 (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (* (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (/ Om l) (/ 1 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin kx) (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 ky)))))

rewrite237.0ms (3.9%)

Memory

-14.3MiB live, 321.6MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2024	33200
0	2077	28622
0	8492	27609

Stop Event

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

Counts

355 → 422

Calls

Call 1

Inputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))
#s(literal 1 binary64)
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))
(-.f64 #s(literal 1 binary64) (fma.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) ky)))))
(fma.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) ky))))
(cos.f64 (*.f64 #s(literal 2 binary64) kx))
(*.f64 #s(literal 2 binary64) kx)
#s(literal 2 binary64)
kx
(.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
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(/.f64 (+.f64 l l) Om)
(+.f64 l l)
l
Om
(sqrt.f64 #s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64)))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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)))))))) (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))))
#s(approx (* (/ 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)))
(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))
#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))))
(/.f64 Om (*.f64 l (sin.f64 ky)))
(*.f64 l (sin.f64 ky))
(sin.f64 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 l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(/.f64 Om l)
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))
#s(approx (sin kx) kx)
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.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) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky)))))
(-.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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 1/2))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ (+ l l) Om) (/ (+ l l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (+ l l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (+ l 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/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 (/ Om (* l (sin ky))) #s(hole binary64 (/ Om (* l (sin ky)))))
#s(approx (* l (sin ky)) #s(hole binary64 (* l (sin ky))))
#s(approx (/ Om l) #s(hole binary64 (/ Om l)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))))
#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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
#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/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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky)))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 ky))) (* (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 (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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))
#s(approx (cos (* 2 kx)) #s(hole binary64 (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 (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 (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx)))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (+ 1/2 (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1))))))
#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/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 (/ Om (* l (sin ky))) #s(hole binary64 (/ Om (* ky l))))
#s(approx (/ Om (* l (sin ky))) #s(hole binary64 (/ (+ (* 1/6 (/ (* Om (pow ky 2)) l)) (/ Om l)) ky)))
#s(approx (/ Om (* l (sin ky))) #s(hole binary64 (/ (+ (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) ky)))
#s(approx (/ Om (* l (sin ky))) #s(hole binary64 (/ (+ (* (pow ky 2) (- (* (pow ky 2) (- (* -1 (* (pow ky 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) ky)))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky l)))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky (+ l (* -1/6 (* (pow ky 2) l))))))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky (+ l (* (pow ky 2) (+ (* -1/6 l) (* 1/120 (* (pow ky 2) l))))))))
#s(approx (* l (sin ky)) #s(hole binary64 (* ky (+ l (* (pow ky 2) (+ (* -1/6 l) (* (pow ky 2) (+ (* -1/5040 (* (pow ky 2) l)) (* 1/120 l)))))))))
#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 (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 (- 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 (cos (* 2 ky)))))
#s(approx (cos (* 2 ky)) #s(hole binary64 (cos (* 2 ky))))
#s(approx (sin ky) #s(hole binary64 (sin ky)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 ky)))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))

Outputs
(pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))))
#s(literal 1 binary64)
(pow.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)))) #s(literal 1 binary64)) (-.f64 (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64)))))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(+.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om))) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.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) ky)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (fma.f64 (fma.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) ky)))) (fma.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) ky)))) (.f64 #s(literal 1 binary64) (fma.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) ky))))))))
(-.f64 #s(literal 1 binary64) (fma.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) ky)))))
(/.f64 (-.f64 (.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 (.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 (.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) ky)))))
(/.f64 (+.f64 (pow.f64 (.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) (cos.f64 (.f64 #s(literal 2 binary64) ky))) #s(literal 3 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 (.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 (.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) ky)))))))
(fma.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) ky))))
(+.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) ky))))
(sin.f64 (fma.f64 #s(literal 2 binary64) kx (/.f64 (PI.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 #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)
#s(literal 2 binary64)
kx
(.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 #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)))))
(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
(*.f64 (neg.f64 (/.f64 (+.f64 l l) Om)) (neg.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) (fabs.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))
(/.f64 (neg.f64 (+.f64 l l)) (neg.f64 Om))
(/.f64 (+.f64 l l) Om)
(+.f64 (/.f64 l Om) (/.f64 l Om))
(/.f64 (-.f64 (.f64 l l) (.f64 l l)) (-.f64 l l))
(/.f64 (fma.f64 (.f64 l l) l (.f64 (.f64 l l) l)) (fma.f64 l l (-.f64 (.f64 l l) (*.f64 l l))))
(+.f64 l l)
l
Om
(pow.f64 #s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64)))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (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))) #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))))
#s(approx (* (/ 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)))
(/.f64 (-.f64 (.f64 (.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))))) (.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/4 binary64)) (-.f64 (.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)))
(/.f64 (+.f64 (pow.f64 (.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 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.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))))) (.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))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.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)))))
(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))
(+.f64 (.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))
#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))))
(/.f64 (neg.f64 Om) (neg.f64 (*.f64 l (sin.f64 ky))))
(/.f64 Om (*.f64 l (sin.f64 ky)))
(*.f64 l (sin.f64 ky))
(sin.f64 ky)
(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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx))))) #s(literal 1/2 binary64))
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(/.f64 (neg.f64 Om) (neg.f64 l))
(/.f64 Om l)
(pow.f64 (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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(approx (sin kx) kx) #s(approx (sin kx) 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(approx (sin kx) kx) #s(approx (sin kx) kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sin kx) kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 #s(approx (sin kx) kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) #s(approx (sin kx) kx))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 #s(approx (sin kx) kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 #s(approx (sin kx) kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) #s(approx (sin kx) kx))
(hypot.f64 (sin.f64 ky) (neg.f64 #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))
#s(approx (sin kx) kx)
(pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))))
(pow.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)))) #s(literal 1 binary64)) (-.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64)))))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))
(+.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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) ky)))))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 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 (-.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)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) (-.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1 binary64))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(literal 1 binary64))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) (.f64 Om Om)) (.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ (+ l l) Om) (/ (+ l l) Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (*.f64 Om Om))))
#s(approx (/ (+ l l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (+ l 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/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 (/ Om (* l (sin ky))) (/.f64 Om (*.f64 l (sin.f64 ky))))
#s(approx (* l (sin ky)) (*.f64 l (sin.f64 ky)))
#s(approx (/ Om l) (/.f64 Om l))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -3 binary64)))))) (.f64 (.f64 (.f64 l l) l) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/.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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))))))) l) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky)))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.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 binary64) (fma.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) 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 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -7 binary64)))) (.f64 #s(literal 3/512 binary64) (.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))) Om))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))))))) Om))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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/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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (+ (- 1/2 (* 1/2 (cos (* 2 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) ky)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 kx kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.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) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 kx kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.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) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 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 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 kx kx) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)) (.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))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)) (.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 (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) (-.f64 (.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) (-.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 (* 2 kx) (*.f64 #s(literal 2 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 #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/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 binary64) (fma.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) ky)))))) (.f64 Om Om))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 binary64) (fma.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) ky)))))) (.f64 Om Om)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 binary64) (fma.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) ky)))))) (.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (fma.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) ky)))))
#s(approx (cos (* 2 kx)) (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) (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 (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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) kx))))) (.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (+ (- 1/2 (* 1/2 (cos (* 2 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)))) (- 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 (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 ky ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.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) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.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 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 ky ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.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) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.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))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 ky ky) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)) (.f64 (.f64 ky ky) (-.f64 (.f64 #s(literal 1/3 binary64) (*.f64 ky ky)) #s(literal 1 binary64))))))
#s(approx (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)) (.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 (* 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/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 (/ Om (* l (sin ky))) (/.f64 Om (*.f64 ky l)))
#s(approx (/ Om (* l (sin ky))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 Om (.f64 ky ky)) l) (/.f64 Om l)) ky))
#s(approx (/ Om (* l (sin ky))) (/.f64 (fma.f64 (.f64 ky ky) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/36 binary64) (/.f64 Om l) (.f64 #s(literal 1/120 binary64) (/.f64 Om l))))) (.f64 #s(literal -1/6 binary64) (/.f64 Om l))) (/.f64 Om l)) ky))
#s(approx (/ Om (* l (sin ky))) (/.f64 (fma.f64 (.f64 ky ky) (-.f64 (.f64 (.f64 ky ky) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/5040 binary64) (/.f64 Om l) (fma.f64 #s(literal 1/720 binary64) (/.f64 Om l) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (/.f64 Om l) (.f64 #s(literal 1/120 binary64) (/.f64 Om l)))))))) (fma.f64 #s(literal -1/36 binary64) (/.f64 Om l) (.f64 #s(literal 1/120 binary64) (/.f64 Om l))))) (.f64 #s(literal -1/6 binary64) (/.f64 Om l))) (/.f64 Om l)) ky))
#s(approx (* l (sin ky)) (*.f64 ky l))
#s(approx (* l (sin ky)) (.f64 ky (+.f64 l (.f64 #s(literal -1/6 binary64) (.f64 (.f64 ky ky) l)))))
#s(approx (* l (sin ky)) (.f64 ky (+.f64 l (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) l (.f64 #s(literal 1/120 binary64) (.f64 (.f64 ky ky) l)))))))
#s(approx (* l (sin ky)) (.f64 ky (+.f64 l (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/6 binary64) l (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 ky ky) l) (.f64 #s(literal 1/120 binary64) l))))))))
#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 (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 (- 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))) (.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 (sin ky) (sin.f64 ky))
#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)))))

eval74.0ms (1.2%)

Memory: -22.6MiB live, 119.2MiB allocated; 17ms collecting garbage
Compiler: Compiled 20 865 to 3 524 computations (83.1% saved)

prune14.0ms (0.2%)

Memory

36.7MiB live, 36.7MiB allocated; 0ms collecting garbage

Pruning

13 alts after pruning (7 fresh and 6 done)

	Pruned	Kept	Total
New	418	1	419
Fresh	0	6	6
Picked	1	4	5
Done	0	2	2
Total	419	13	432

Accuracy

100.0%

Counts

432 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	70.3%	(.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))))))))))))
✓	92.4%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
✓	92.1%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
▶	71.2%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
✓	55.7%	(sqrt.f64 #s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64)))
	48.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
▶	49.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) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))))
✓	47.0%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
▶	34.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
✓	64.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 #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))))
▶	18.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 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))))))))))))
	45.3%	#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))))
✓	63.2%	#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 732 to 702 computations (4.1% saved)

series153.0ms (2.5%)

Memory

-6.6MiB live, 227.4MiB allocated; 20ms collecting garbage

Counts

59 → 512

Calls

Call 1

Inputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))
#s(literal 1 binary64)
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))))
(-.f64 #s(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)
#s(literal 2 binary64)
kx
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(/.f64 (+.f64 l l) Om)
(+.f64 l l)
l
Om
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
#s(approx (* (/ 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)))
(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))
#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))))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(*.f64 l (sin.f64 kx))
(sin.f64 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))))))))))))
#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))))))))
(.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)))))
(sqrt.f64 #s(approx (* (/ 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))
(/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(*.f64 Om #s(literal 1 binary64))
(*.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))
(sin.f64 ky)
ky
#s(approx (sin kx) 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)) (-.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))
(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)))))))))))
(+.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) (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))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
#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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 1/2))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ (+ l l) Om) (/ (+ l l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (+ l l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (+ l 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/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 (/ Om (* l (sin kx))) #s(hole binary64 (/ Om (* l (sin kx)))))
#s(approx (* l (sin kx)) #s(hole binary64 (* l (sin 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))
#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/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 l)) 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 (+ (* 1/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt 2)))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/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 (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (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/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 (* (+ 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 (+ (* 1/4 (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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) (sqrt (+ 1 (/ 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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1 (/ 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 2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (/ 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 2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 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 (* (* (/ (* 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 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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))))
#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 (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 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/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) (sqrt (+ 1 (/ 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 (/ (* (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* 1/32 (/ (pow Om 2) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -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) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (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 (* Om 1) #s(hole binary64 Om))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 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/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) (sqrt (+ 1 (/ 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/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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/32 (/ Om (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (- (* 1/2 (* Om (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))))) (* 1/32 (/ 1 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
#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/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 (/ 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/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (/ 1 Om))))))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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 (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 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))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (+ (* 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 (/ (- (* -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)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (* -1 (* 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 (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (/ 1 Om)))))))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#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 (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/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 (/ Om (* l (sin kx))) #s(hole binary64 (/ Om (* kx l))))
#s(approx (/ Om (* l (sin kx))) #s(hole binary64 (/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx)))
#s(approx (/ Om (* l (sin kx))) #s(hole binary64 (/ (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)))
#s(approx (/ Om (* l (sin kx))) #s(hole binary64 (/ (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx l)))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx (+ l (* -1/6 (* (pow kx 2) l))))))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* 1/120 (* (pow kx 2) l))))))))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* (pow kx 2) (+ (* -1/5040 (* (pow kx 2) l)) (* 1/120 l)))))))))
#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 (* (+ 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/4 (/ Om l)) (* 1/2 kx)) kx)))
#s(approx (+ 1/2 (* 1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (+ (* 1/4 (/ Om l)) (* kx (+ 1/2 (* 1/24 (/ (* Om kx) l))))) kx)))
#s(approx (+ 1/2 (* 1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (+ (* 1/4 (/ Om l)) (* kx (+ 1/2 (* kx (+ (* 7/1440 (/ (* Om (pow kx 2)) l)) (* 1/24 (/ 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/24 (/ (* Om (pow kx 2)) 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 l)) (* (pow kx 2) (+ (* 7/1440 (/ (* Om (pow kx 2)) l)) (* 1/24 (/ Om 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) (+ (* 31/60480 (/ (* Om (pow kx 2)) l)) (* 7/1440 (/ Om 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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin ky)))))
#s(approx (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* l (sin ky))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow kx 2) l) (sin ky))) (* l (sin ky)))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin ky)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))))) (sin ky))) (* 1/2 (/ l (sin ky))))))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin ky)) (* (pow kx 2) (+ (* 1/2 (/ l (sin ky))) (* (pow kx 2) (+ (* -1/2 (/ (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (* l (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (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 (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 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) (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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/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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 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))))))) (* 1/2 (* (* (pow kx 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#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 (/ 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 (sin kx) #s(hole binary64 (sin 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 (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 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt (+ 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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 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/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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin kx)))))
#s(approx (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* l (sin kx))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow ky 2) l) (sin kx))) (* l (sin kx)))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin kx)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))))) (sin kx))) (* 1/2 (/ l (sin kx))))))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin kx)) (* (pow ky 2) (+ (* 1/2 (/ l (sin kx))) (* (pow ky 2) (+ (* -1/2 (/ (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (* l (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (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 ky #s(hole binary64 ky))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 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) (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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/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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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))))))) (* 1/2 (* (* (pow ky 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sin ky) #s(hole binary64 (sin ky)))

Calls

12 calls:

Time	Variable		Point	Expression
13.0ms	l	@	0	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l 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/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)))))) (/ Om (* l (sin kx))) (* l (sin kx)) (sin 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 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)))))))) (* (/ 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))))) (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) ky (sin kx) (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (/ 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)) (/ (* 2 l) Om) (* 2 l) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
12.0ms	kx	@	0	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l 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/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)))))) (/ Om (* l (sin kx))) (* l (sin kx)) (sin 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 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)))))))) (* (/ 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))))) (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) ky (sin kx) (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (/ 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)) (/ (* 2 l) Om) (* 2 l) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
11.0ms	kx	@	inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l 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/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)))))) (/ Om (* l (sin kx))) (* l (sin kx)) (sin 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 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)))))))) (* (/ 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))))) (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) ky (sin kx) (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (/ 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)) (/ (* 2 l) Om) (* 2 l) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
10.0ms	kx	@	-inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l 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/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)))))) (/ Om (* l (sin kx))) (* l (sin kx)) (sin 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 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)))))))) (* (/ 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))))) (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) ky (sin kx) (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (/ 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)) (/ (* 2 l) Om) (* 2 l) (+ (pow (sin kx) 2) (pow (sin ky) 2)))
10.0ms	l	@	-inf	((sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (- 1/2 (* 1/2 (cos (* 2 kx)))) (* 1/2 (cos (* 2 kx))) (cos (* 2 kx)) (* 2 kx) 2 kx (* (/ (+ l l) Om) (/ (+ l l) Om)) (/ (+ l l) Om) (+ l l) l 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/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)))))) (/ Om (* l (sin kx))) (* l (sin kx)) (sin 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 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)))))))) (* (/ 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))))) (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (sin ky) ky (sin kx) (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (/ 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)) (/ (* 2 l) Om) (* 2 l) (+ (pow (sin kx) 2) (pow (sin ky) 2)))

rewrite349.0ms (5.8%)

Memory

-17.5MiB live, 313.5MiB allocated; 49ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2843	55739
0	2908	48963
0	9491	46794

Stop Event

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

Counts

571 → 636

Calls

Call 1

Inputs
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))))
#s(literal 1 binary64)
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))))
(-.f64 #s(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)
#s(literal 2 binary64)
kx
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(/.f64 (+.f64 l l) Om)
(+.f64 l l)
l
Om
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
#s(approx (* (/ 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)))
(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))
#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))))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(*.f64 l (sin.f64 kx))
(sin.f64 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))))))))))))
#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))))))))
(.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)))))
(sqrt.f64 #s(approx (* (/ 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))
(/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(*.f64 Om #s(literal 1 binary64))
(*.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))
(sin.f64 ky)
ky
#s(approx (sin kx) 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)) (-.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))
(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)))))))))))
(+.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) (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))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 #s(literal 2 binary64) l)
#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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 1))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1/2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* 1/2 (* (pow l 2) (- (* -1/4 (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1/2 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (pow Om 2)))))) (* 1/2 (- (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (* 1/4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 1/2))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (* (pow l 2) (+ (* -1 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 1))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 1))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))
#s(approx (* (/ (+ l l) Om) (/ (+ l l) Om)) #s(hole binary64 (* 4 (/ (pow l 2) (pow Om 2)))))
#s(approx (/ (+ l l) Om) #s(hole binary64 (* 2 (/ l Om))))
#s(approx (+ l 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/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 (/ Om (* l (sin kx))) #s(hole binary64 (/ Om (* l (sin kx)))))
#s(approx (* l (sin kx)) #s(hole binary64 (* l (sin 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))
#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/4 (* Om (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 l)) 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 (+ (* 1/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) #s(hole binary64 (* (sqrt 1/2) (sqrt 2))))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt 2)))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (pow Om 2) (sqrt 2)))) (* 1/2 (/ (* (pow l 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (* (pow l 2) (+ (* -1 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (* (pow Om 2) (sqrt 2)))) (* (pow l 2) (+ (* 1/2 (/ (* (pow l 2) (- (* -1/2 (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6))))) (* -1 (/ (* (+ (pow (sin kx) 2) (pow (sin ky) 2)) (- (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))) (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2)))))) (sqrt 2))) (* 1/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 (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 2))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt 1/2)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (+ (* -1/128 (/ (pow Om 2) (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (+ (* 1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* (pow l 3) (sqrt 1/2)))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 1/2))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 5))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* 1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (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/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 (* (+ 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 (+ (* 1/4 (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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) (sqrt (+ 1 (/ 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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1 (/ 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 2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))
#s(approx (sqrt (+ 1 (/ 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 2) (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(hole binary64 1))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 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 (* (* (/ (* 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 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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1/8 (* (/ Om (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* 1/128 (/ (pow Om 2) (* l (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (- (* -1/32 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ (pow Om 3) (pow (sqrt 1/2) 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))))) (* l (sqrt 1/2)))) (* -1/128 (/ (pow Om 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) l)) (* 1/8 (* (/ Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l)))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1/4 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/2 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1/2 (* (/ Om l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) l))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (* Om (pow l 4))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))) (* 1/256 (/ (pow Om 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* Om (pow l 6))) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) l))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))))
#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 (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 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/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) (sqrt (+ 1 (/ 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 (/ (* (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* 1/32 (/ (pow Om 2) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -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) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) l)) (* 1/4 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* -1/128 (/ Om (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt 1/2) (* Om (+ (* 1/8 (* (/ 1 (* l (sqrt 1/2))) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* Om (- (* 1/2 (/ (* Om (- (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/512 (* (/ 1 (* (pow l 3) (pow (sqrt 1/2) 4))) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) (sqrt 1/2))) (* 1/128 (/ 1 (* (pow l 2) (* (pow (sqrt 1/2) 3) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/4096 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/512 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (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 (* Om 1) #s(hole binary64 Om))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 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/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) (sqrt (+ 1 (/ 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/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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* Om (+ (* -1/32 (/ Om (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ 1 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* Om (- (* 1/2 (* Om (- (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))))))) (* 1/32 (/ 1 (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ 1 (+ (* -1/2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* 1/2 (/ (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* 1/2 (/ (- (* -1/4 (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/2 (* (pow l 2) (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/4 (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))))) (* 1/4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))))))) (pow Om 6))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ 1/2 (+ (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
#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/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 (/ 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/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (/ 1 Om))))))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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 (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (* 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))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt 2) (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (* (pow Om 2) (sqrt 2)))) (+ (* 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 (/ (- (* -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)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (* -1 (* 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 (* -1 (* Om (- (* -1/4 (* (/ 1 l) (sqrt (/ 1 (- 1/2 (* 1/2 (cos (* 2 kx)))))))) (* 1/2 (/ 1 Om)))))))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow kx 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow kx 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* (pow kx 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1/2 (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))))
#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 (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/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 (/ Om (* l (sin kx))) #s(hole binary64 (/ Om (* kx l))))
#s(approx (/ Om (* l (sin kx))) #s(hole binary64 (/ (+ (* 1/6 (/ (* Om (pow kx 2)) l)) (/ Om l)) kx)))
#s(approx (/ Om (* l (sin kx))) #s(hole binary64 (/ (+ (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)))
#s(approx (/ Om (* l (sin kx))) #s(hole binary64 (/ (+ (* (pow kx 2) (- (* (pow kx 2) (- (* -1 (* (pow kx 2) (+ (* -1/5040 (/ Om l)) (+ (* 1/720 (/ Om l)) (* 1/6 (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l)))))))) (+ (* -1/36 (/ Om l)) (* 1/120 (/ Om l))))) (* -1/6 (/ Om l)))) (/ Om l)) kx)))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx l)))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx (+ l (* -1/6 (* (pow kx 2) l))))))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* 1/120 (* (pow kx 2) l))))))))
#s(approx (* l (sin kx)) #s(hole binary64 (* kx (+ l (* (pow kx 2) (+ (* -1/6 l) (* (pow kx 2) (+ (* -1/5040 (* (pow kx 2) l)) (* 1/120 l)))))))))
#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 (* (+ 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/4 (/ Om l)) (* 1/2 kx)) kx)))
#s(approx (+ 1/2 (* 1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (+ (* 1/4 (/ Om l)) (* kx (+ 1/2 (* 1/24 (/ (* Om kx) l))))) kx)))
#s(approx (+ 1/2 (* 1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) #s(hole binary64 (/ (+ (* 1/4 (/ Om l)) (* kx (+ 1/2 (* kx (+ (* 7/1440 (/ (* Om (pow kx 2)) l)) (* 1/24 (/ 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/24 (/ (* Om (pow kx 2)) 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 l)) (* (pow kx 2) (+ (* 7/1440 (/ (* Om (pow kx 2)) l)) (* 1/24 (/ Om 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) (+ (* 31/60480 (/ (* Om (pow kx 2)) l)) (* 7/1440 (/ Om 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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin ky)))))
#s(approx (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* l (sin ky))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow kx 2) l) (sin ky))) (* l (sin ky)))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin ky)) (* (pow kx 2) (+ (* -1/2 (/ (* (pow kx 2) (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))))) (sin ky))) (* 1/2 (/ l (sin ky))))))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin ky)) (* (pow kx 2) (+ (* 1/2 (/ l (sin ky))) (* (pow kx 2) (+ (* -1/2 (/ (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2))))) (sin ky))) (* 1/2 (/ (* (pow kx 2) (* l (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin ky) 2)))) (pow (sin ky) 2)))))) (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 (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 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) (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* -1 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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/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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 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))))))) (* 1/2 (* (* (pow kx 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))
#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 (/ 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 (sin kx) #s(hole binary64 (sin 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 (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 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) #s(hole binary64 (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt (+ 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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* -1/2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(hole binary64 (+ (sqrt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow ky 2) (+ (* -1/2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/2 (* (* (pow ky 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))) (* -1/2 (* (/ (* (pow l 2) (- (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* 1/4 (/ (pow l 4) (* (pow Om 4) (* (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (/ 1 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(hole binary64 (+ 1/2 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(hole binary64 (+ (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(hole binary64 (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(hole binary64 (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(hole binary64 (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) #s(hole binary64 (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 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/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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))))) #s(hole binary64 (/ Om (* l (sin kx)))))
#s(approx (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (* l (sin kx))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow ky 2) l) (sin kx))) (* l (sin kx)))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin kx)) (* (pow ky 2) (+ (* -1/2 (/ (* (pow ky 2) (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))))) (sin kx))) (* 1/2 (/ l (sin kx))))))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) #s(hole binary64 (+ (* l (sin kx)) (* (pow ky 2) (+ (* 1/2 (/ l (sin kx))) (* (pow ky 2) (+ (* -1/2 (/ (* l (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2))))) (sin kx))) (* 1/2 (/ (* (pow ky 2) (* l (- 2/45 (* -1/2 (/ (+ 1/3 (* 1/4 (/ 1 (pow (sin kx) 2)))) (pow (sin kx) 2)))))) (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 ky #s(hole binary64 ky))
#s(approx (* (sqrt 1/2) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 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) (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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) (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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/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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(hole binary64 (+ (sqrt (+ 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 (* (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 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))))))) (* 1/2 (* (* (pow ky 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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 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 (sin ky) #s(hole binary64 (sin ky)))

Outputs
(pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))))
#s(literal 1 binary64)
(pow.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64)))))
(fma.f64 #s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(literal 1 binary64))
(+.f64 (.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(literal 1 binary64))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 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)))))
(*.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 (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))))
(-.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)
#s(literal 2 binary64)
kx
(*.f64 (neg.f64 (/.f64 (+.f64 l l) Om)) (neg.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) (fabs.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64))
(/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))
(/.f64 (neg.f64 (+.f64 l l)) (neg.f64 Om))
(/.f64 (+.f64 l l) Om)
(+.f64 (/.f64 l Om) (/.f64 l Om))
(/.f64 (fma.f64 (.f64 l l) l (.f64 (.f64 l l) l)) (fma.f64 l l (-.f64 (.f64 l l) (*.f64 l l))))
(+.f64 l l)
l
Om
(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) #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))) #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))))
#s(approx (* (/ 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)))
(/.f64 (+.f64 (pow.f64 (.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 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (.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))))) (.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))))) (-.f64 #s(literal 1/4 binary64) (.f64 (.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)))))
(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))
(+.f64 (.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))
#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))))
(/.f64 (neg.f64 Om) (neg.f64 (*.f64 l (sin.f64 kx))))
(/.f64 Om (*.f64 l (sin.f64 kx)))
(*.f64 l (sin.f64 kx))
(sin.f64 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 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) (-.f64 (.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))))))))
(.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)))))
(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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) 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) #s(approx (sin kx) kx))))) #s(literal 1/2 binary64))
(*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(/.f64 (neg.f64 (.f64 Om #s(literal 1 binary64))) (neg.f64 (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))))
(/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))))
(*.f64 Om #s(literal 1 binary64))
(*.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) 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(approx (sin kx) kx) #s(approx (sin kx) 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(approx (sin kx) kx) #s(approx (sin kx) kx))))
(hypot.f64 (neg.f64 (sin.f64 ky)) (neg.f64 #s(approx (sin kx) kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) (fabs.f64 #s(approx (sin kx) kx)))
(hypot.f64 (neg.f64 (sin.f64 ky)) #s(approx (sin kx) kx))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (neg.f64 #s(approx (sin kx) kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 #s(approx (sin kx) kx)))
(hypot.f64 (fabs.f64 (sin.f64 ky)) #s(approx (sin kx) kx))
(hypot.f64 (sin.f64 ky) (neg.f64 #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) (fabs.f64 #s(approx (sin kx) kx)))
(hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx))
(sin.f64 ky)
ky
#s(approx (sin kx) 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) (.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))))))))))))
(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))))))))))))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 1/2 binary64))
(pow.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)))))))))) #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)))))))))))
(/.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) (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)))
(/.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(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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) #s(literal 1 binary64))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) (-.f64 (.f64 #s(literal -1/4 binary64) (fma.f64 #s(literal -16 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1 binary64))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) #s(literal 1/2 binary64))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) #s(literal 1 binary64))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 64 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) #s(literal 1 binary64))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 l l) (fma.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) (.f64 Om Om)) (.f64 (.f64 l l) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))
#s(approx (* (/ (+ l l) Om) (/ (+ l l) Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 l l) (*.f64 Om Om))))
#s(approx (/ (+ l l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (+ l 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/4 (/ (* Om 1) (* l (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 1) (* l (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 (/ Om (* l (sin kx))) (/.f64 Om (*.f64 l (sin.f64 kx))))
#s(approx (* l (sin kx)) (*.f64 l (sin.f64 kx)))
#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 (fma.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))))))) (.f64 #s(literal 1/2 binary64) l)) 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 (+ (* 1/4 (/ (* Om 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (*.f64 l (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))))))))) #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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (sqrt.f64 #s(literal 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 (*.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (sqrt.f64 #s(literal 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 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (sqrt.f64 #s(literal 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 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 l l) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.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))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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 (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om (.f64 l (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -3 binary64)))))) (.f64 (.f64 (.f64 l l) l) (sqrt.f64 #s(literal 1/2 binary64)))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (/.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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om))))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (.f64 (.f64 l l) (fma.f64 #s(literal 4 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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/4 (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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 (* (+ 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 (+ (* 1/4 (/ (* Om 1) (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))))) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* 1/4 (/ (* Om 1) (* l (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))))))))) (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 (sqrt (+ 1 (/ 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 (/ 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/4 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (/ 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/32 binary64) (/.f64 (.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 #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 l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
#s(approx (sqrt (+ 1 (/ 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/32 binary64) (/.f64 (.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 #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 Om l) (/.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/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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 1 binary64))
#s(approx (+ 1 (/ 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 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 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/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 (* (* (/ (* 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 (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))))))) l) (.f64 #s(literal 1/8 binary64) (.f64 (/.f64 Om (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l)))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))) l)))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (.f64 Om (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))) (.f64 Om (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 Om (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))) l)))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (.f64 #s(literal -2 binary64) (.f64 (/.f64 l Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) Om) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #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 (/ 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 (sqrt (+ 1 (/ 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/4 binary64) (.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (sqrt (+ 1 (/ 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 (fma.f64 #s(literal 1/32 binary64) (/.f64 (.f64 Om Om) (.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 Om (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l))))
#s(approx (sqrt (+ 1 (/ 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 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.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 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)))))))) l) (.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 (* (* (/ (* 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 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
#s(approx (+ 1 (/ 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 (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 (* (* (/ (* 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 (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky)))))))))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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) (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky)))))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64)))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (.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 binary64) (fma.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) 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 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -7 binary64)))) (.f64 #s(literal 3/512 binary64) (.f64 (pow.f64 l #s(literal -5 binary64)) (sqrt.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64))))))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))))) (.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))))))) Om))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))))))))) Om))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (/.f64 (fma.f64 #s(literal 2 binary64) (.f64 l (sqrt.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal -5 binary64)))))))))) Om))
#s(approx (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (/.f64 (fma.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 (* Om 1) 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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 Om (fma.f64 #s(literal -1/32 binary64) (/.f64 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 #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 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
#s(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 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 Om (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 Om (-.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)))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 l l) (.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2) (+.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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 binary64) (fma.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) ky))))) #s(literal 2 binary64))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))) (.f64 #s(literal 64 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) ky))))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))) (*.f64 Om Om))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) 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 binary64) (fma.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) ky)))))) (.f64 Om Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (fma.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) 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/4 (/ (* Om 1) (* l (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 (/ 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 (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 1) (* l (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 (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (sqrt.f64 #s(literal 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 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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(approx (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (sqrt.f64 #s(literal 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 (.f64 Om Om) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.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)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.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(approx (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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/4 (/ (* Om 1) (* l (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 (+ 1/2 (* 1/4 (* (/ Om l) (/ 1 (sqrt (- 1/2 (* 1/2 (cos (* 2 kx))))))))) (.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) (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 1) (* l (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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (+ (- 1/2 (* 1/2 (cos (* 2 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) ky)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 kx kx)) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 kx kx) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 kx kx))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.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) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#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) (-.f64 (.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) (-.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 (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) (-.f64 (.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) (-.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 (* 2 kx) (*.f64 #s(literal 2 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 #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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 (/ Om (* l (sin kx))) (/.f64 Om (*.f64 kx l)))
#s(approx (/ Om (* l (sin kx))) (/.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 Om (.f64 kx kx)) l) (/.f64 Om l)) kx))
#s(approx (/ Om (* l (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/36 binary64) (/.f64 Om l) (.f64 #s(literal 1/120 binary64) (/.f64 Om l))))) (.f64 #s(literal -1/6 binary64) (/.f64 Om l))) (/.f64 Om l)) kx))
#s(approx (/ Om (* l (sin kx))) (/.f64 (fma.f64 (.f64 kx kx) (-.f64 (.f64 (.f64 kx kx) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/5040 binary64) (/.f64 Om l) (fma.f64 #s(literal 1/720 binary64) (/.f64 Om l) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/36 binary64) (/.f64 Om l) (.f64 #s(literal 1/120 binary64) (/.f64 Om l)))))))) (fma.f64 #s(literal -1/36 binary64) (/.f64 Om l) (.f64 #s(literal 1/120 binary64) (/.f64 Om l))))) (.f64 #s(literal -1/6 binary64) (/.f64 Om l))) (/.f64 Om l)) kx))
#s(approx (* l (sin kx)) (*.f64 kx l))
#s(approx (* l (sin kx)) (.f64 kx (+.f64 l (.f64 #s(literal -1/6 binary64) (.f64 (.f64 kx kx) l)))))
#s(approx (* l (sin kx)) (.f64 kx (+.f64 l (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/6 binary64) l (.f64 #s(literal 1/120 binary64) (.f64 (.f64 kx kx) l)))))))
#s(approx (* l (sin kx)) (.f64 kx (+.f64 l (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/6 binary64) l (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 kx kx) l) (.f64 #s(literal 1/120 binary64) l))))))))
#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 (* (+ 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 (fma.f64 #s(literal 1/4 binary64) (/.f64 Om l) (*.f64 #s(literal 1/2 binary64) kx)) kx))
#s(approx (+ 1/2 (* 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 kx (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 Om kx) l))))) kx))
#s(approx (+ 1/2 (* 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 kx (+.f64 #s(literal 1/2 binary64) (.f64 kx (fma.f64 #s(literal 7/1440 binary64) (/.f64 (.f64 Om (.f64 kx kx)) l) (*.f64 #s(literal 1/24 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/24 binary64) (/.f64 (.f64 Om (.f64 kx kx)) 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 (fma.f64 #s(literal 1/4 binary64) (/.f64 Om l) (.f64 (.f64 kx kx) (fma.f64 #s(literal 7/1440 binary64) (/.f64 (.f64 Om (.f64 kx kx)) l) (*.f64 #s(literal 1/24 binary64) (/.f64 Om 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 31/60480 binary64) (/.f64 (.f64 Om (.f64 kx kx)) l) (*.f64 #s(literal 7/1440 binary64) (/.f64 Om 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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (*.f64 l (sin.f64 ky)))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 kx kx) l) (sin.f64 ky)) (*.f64 l (sin.f64 ky))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 l (sin.f64 ky) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 kx kx) (.f64 l (+.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 l (sin.f64 ky)))))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 l (sin.f64 ky) (.f64 (.f64 kx kx) (fma.f64 #s(literal 1/2 binary64) (/.f64 l (sin.f64 ky)) (.f64 (.f64 kx kx) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l (+.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 l (-.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)))))))))
#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 (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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (sqrt.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)))))))))
#s(approx (sqrt (+ 1 (/ 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l 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) (.f64 (/.f64 (.f64 (.f64 kx kx) (.f64 l l)) (.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)))))))))
#s(approx (sqrt (+ 1 (/ 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l 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)) (/.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 (.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 (/ 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l 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)) (/.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 (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 (.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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 kx kx) (-.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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 binary64) (fma.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) ky)))))) (.f64 Om Om))))))))))
#s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 binary64) (fma.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) ky)))))) (.f64 Om Om)))))))))
#s(approx (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 binary64) (fma.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) ky)))))) (.f64 Om Om))))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 binary64) (fma.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) ky)))))) (*.f64 Om Om)))))))
#s(approx (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (*.f64 Om Om))))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky))))))
#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 (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 (sin kx) (sin.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 (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 (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx)))) (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 (.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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (sqrt.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 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sqrt (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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) kx))))) (.f64 Om Om)))))))
#s(approx (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1)) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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 (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1) (+.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 (+ (- 1/2 (* 1/2 (cos (* 2 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)))) (- 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 (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 ky ky) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (.f64 ky ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.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) (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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l l) (-.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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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/4 (/ (* Om 1) (* l (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 1) (* l (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 1) (* l (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 1) (* l (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 (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (*.f64 l (sin.f64 kx)))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 ky ky) l) (sin.f64 kx)) (*.f64 l (sin.f64 kx))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 l (sin.f64 kx) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 ky ky) (.f64 l (+.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 l (sin.f64 kx)))))))
#s(approx (* l (sqrt (+ (* (sin ky) (sin ky)) (* (sin kx) (sin kx))))) (fma.f64 l (sin.f64 kx) (.f64 (.f64 ky ky) (fma.f64 #s(literal 1/2 binary64) (/.f64 l (sin.f64 kx)) (.f64 (.f64 ky ky) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 l (+.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 l (-.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)))))))))
#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 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 (sqrt (+ 1 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (sqrt.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)))))))))
#s(approx (sqrt (+ 1 (/ 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l 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) (.f64 (/.f64 (.f64 (.f64 ky ky) (.f64 l l)) (.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)))))))))
#s(approx (sqrt (+ 1 (/ 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l 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)) (/.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 (.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 (/ 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (.f64 l 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)) (/.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 (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 (.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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 ky ky) (-.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 (/ 1 (sqrt (+ 1 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (* (* (/ (* 2 l) Om) (/ (* 2 l) Om)) (+ (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 (sin ky) (sin.f64 ky))

eval96.0ms (1.6%)

Memory: 48.6MiB live, 93.7MiB allocated; 5ms collecting garbage
Compiler: Compiled 30 657 to 4 746 computations (84.5% saved)

prune37.0ms (0.6%)

Memory

-15.0MiB live, 30.2MiB allocated; 5ms collecting garbage

Pruning

13 alts after pruning (5 fresh and 8 done)

	Pruned	Kept	Total
New	597	3	600
Fresh	0	2	2
Picked	3	2	5
Done	0	6	6
Total	600	13	613

Accuracy

100.0%

Counts

613 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	63.5%	(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) #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))))))))))
✓	92.4%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (-.f64 #s(literal 1 binary64) (fma.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) ky)))))) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
✓	92.1%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
✓	71.2%	(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
✓	55.7%	(sqrt.f64 #s(approx (+ 1/2 (* (/ 1 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 1))) 1/2)) #s(literal 1/2 binary64)))
	48.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) (sin.f64 kx)))) #s(literal 1/2 binary64))))
	49.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) (/.f64 #s(approx (* Om 1) Om) (*.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))))
✓	47.0%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
✓	34.8%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/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))))
✓	64.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 #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))))
	18.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) (+.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))))))))))))
	45.3%	#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))))
✓	63.2%	#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 999 to 712 computations (28.7% saved)

regimes135.0ms (2.3%)

Memory

16.0MiB live, 206.2MiB allocated; 17ms collecting garbage

Counts

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

Outputs

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

Calls

19 calls:

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

Results

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

Compiler

Compiled 199 to 198 computations (0.5% saved)

regimes112.0ms (1.9%)

Memory

-11.3MiB live, 274.4MiB allocated; 12ms collecting garbage

Counts

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

Outputs

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

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

9.0ms	ky
7.0ms	(sin.f64 kx)
7.0ms	(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
7.0ms	Om
6.0ms	kx

Results

Accuracy	Segments	Branch
92.4%	1	`(sin.f64 ky)`
92.4%	1	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
92.4%	1	`(sin.f64 kx)`
92.4%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
92.4%	1	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
92.4%	1	`(*.f64 #s(literal 2 binary64) l)`
98.3%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
98.3%	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))))))`
99.0%	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.0%	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.0%	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.0%	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))))))))))`
92.4%	1	`l`
94.0%	2	`Om`
92.4%	1	`kx`
92.4%	1	`ky`

Compiler

Compiled 199 to 198 computations (0.5% saved)

regimes13.0ms (0.2%)

Memory

-18.9MiB live, 27.9MiB allocated; 2ms 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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)))))))) (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 #s(approx (* (/ 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 #s(approx (* Om 1) Om) (*.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (* (+ 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)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 Om #s(literal 1 binary64)) (.f64 l (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 Om l) (/.f64 #s(literal 1 binary64) (hypot.f64 (sin.f64 ky) #s(approx (sin kx) kx)))) #s(literal 1/2 binary64))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (.f64 (+.f64 #s(literal 1 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))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) #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))))))))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (+ (- 1/2 ( 1/2 (cos (* 2 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) ky))))) (*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 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))))))))))))

Outputs

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

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

Calls

3 calls:

5.0ms

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

4.0ms

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

4.0ms

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

Results

Accuracy	Segments	Branch
99.2%	2	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
99.2%	2	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
99.2%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) 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)

regimes10.0ms (0.2%)

Memory

22.7MiB live, 22.7MiB allocated; 0ms collecting garbage

Counts

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

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

Calls

3 calls:

3.0ms

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

3.0ms

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

3.0ms

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

Results

Accuracy	Segments	Branch
99.2%	2	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
99.2%	2	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
99.2%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) 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)

regimes13.0ms (0.2%)

Memory

-16.6MiB live, 29.9MiB allocated; 1ms collecting garbage

Counts

5 → 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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)))))))) (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))))

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

7 calls:

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

Results

Accuracy	Segments	Branch
98.4%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
98.4%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
98.4%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
98.4%	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.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))))`
98.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)))))`
98.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))))))`

Compiler

Compiled 159 to 127 computations (20.1% saved)

regimes5.0ms (0.1%)

Memory

9.2MiB live, 9.2MiB allocated; 0ms collecting garbage

Counts

4 → 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 (sqrt (+ (* (+ (- 1/2 (* 1/2 (cos (* 2 ky)))) (- 1/2 (* 1/2 (cos (* 2 kx))))) (* (/ (+ l l) Om) (/ (+ l l) Om))) 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)))))))) (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

3 calls:

1.0ms

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

1.0ms

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

1.0ms

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

Results

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

Compiler

Compiled 56 to 47 computations (16.1% saved)

regimes70.0ms (1.2%)

Memory

10.8MiB live, 57.5MiB allocated; 83ms 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:

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

Results

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

Compiler

Compiled 199 to 198 computations (0.5% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000111509	452.25915388742266

Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	452.25915388742266	27353.330432115145

Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000111509	452.25915388742266

Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000111509	452.25915388742266

Compiler

Compiled 32 to 31 computations (3.1% saved)

bsearch0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.000000000111509	452.25915388742266

Compiler

Compiled 32 to 31 computations (3.1% saved)

derivations209.0ms (3.5%)

Memory

-26.0MiB live, 303.8MiB allocated; 33ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 176 to 106 computations (39.8% saved)

preprocess169.0ms (2.8%)

Memory

37.8MiB live, 467.1MiB allocated; 41ms collecting garbage

Remove

(sort kx ky)

(abs ky)

(abs kx)

(abs Om)

(abs l)

Compiler

Compiled 6 591 to 5 096 computations (22.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze150.0ms (2.5%)

sample2.0s (32.8%)

preprocess41.0ms (0.7%)

series125.0ms (2.1%)

rewrite257.0ms (4.3%)

eval43.0ms (0.7%)

prune13.0ms (0.2%)

series1.1s (18.4%)

rewrite367.0ms (6.1%)

eval104.0ms (1.7%)

prune19.0ms (0.3%)

series115.0ms (1.9%)

rewrite237.0ms (3.9%)

eval74.0ms (1.2%)

prune14.0ms (0.2%)

series153.0ms (2.5%)

rewrite349.0ms (5.8%)

eval96.0ms (1.6%)

prune37.0ms (0.6%)

regimes135.0ms (2.3%)

regimes112.0ms (1.9%)

regimes13.0ms (0.2%)

regimes10.0ms (0.2%)

regimes13.0ms (0.2%)

regimes5.0ms (0.1%)

regimes70.0ms (1.2%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations209.0ms (3.5%)

preprocess169.0ms (2.8%)

end0.0ms (0%)

Profiling