Metrics for Toniolo and Linder, Equation (3a)

start0.0ms (0.0%)

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

analyze110.0ms (2.7%)

Memory

-0.9MiB live, 30.8MiB allocated; 1ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 31 to 24 computations (22.6% saved)

sample1.4s (35.2%)

Memory

23.8MiB live, 425.2MiB allocated; 37ms collecting garbage

Samples

1.1s

8 256×

valid

Precisions

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

ival-sin: 342.0ms (41.4% of total, 52.1 MiB)

ival-pow2: 129.0ms (15.6% of total, 30.9 MiB)

ival-sqrt: 111.0ms (13.4% of total, 21.2 MiB)

ival-mult!: 96.0ms (11.6% of total, 18.8 MiB)

ival-div!: 78.0ms (9.4% of total, 9.4 MiB)

ival-add!: 63.0ms (7.6% of total, 13.3 MiB)

adjust: 5.0ms (0.6% of total, 1.3 MiB)

Bogosity

preprocess43.0ms (1.1%)

Memory

-5.7MiB live, 9.5MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	134	413
1	602	379
2	3083	379

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.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))))))))))

Status

Accuracy

Program

▶

99.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))))))))))

Symmetry

(abs l)

(abs Om)

(abs kx)

(abs ky)

(sort kx ky)

Compiler

Compiled 58 to 44 computations (24.1% saved)

series88.0ms (2.2%)

Memory

-13.1MiB live, 55.1MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1005	17033

Stop Event

1×	iter-limit

Counts

22 → 178

Calls

Call 1

Inputs
#s(literal 1 binary64)
#s(literal 2 binary64)
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
l
(*.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))
kx
(sin.f64 kx)
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
ky
(sin.f64 ky)
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) 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) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) 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)))))))))
(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
#s(approx 1 #s(literal 0 binary64))
#s(approx l l)
#s(approx (* 2 l) (*.f64 #s(literal 2 binary64) l))
#s(approx (/ (* 2 l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (pow (/ (* 2 l) Om) 2) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 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 (pow.f64 l #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 Om #s(literal 2 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 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(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 (pow.f64 l #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 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) #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/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 #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 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) 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 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx Om Om)
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 1 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 1 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 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) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (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 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx kx kx)
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin kx) (.f64 kx (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin kx) 2) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin kx) 2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (sin kx) (sin.f64 kx))
#s(approx (pow (sin kx) 2) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#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 (pow.f64 l #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 Om #s(literal 2 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 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))))))
#s(approx ky ky)
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (sin ky) (sin.f64 ky))

Calls

12 calls:

Time	Variable	Point
4.0ms	l	0
4.0ms	kx	0
3.0ms	Om	0
3.0ms	kx	inf
3.0ms	l	inf

rewrite107.0ms (2.6%)

Memory

-0.8MiB live, 53.3MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	22	198
0	39	198
1	161	192
2	688	192
0	4007	192

Stop Event

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

Counts

22 → 508

Calls

Call 1

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

eval70.0ms (1.7%)

Memory: -1.6MiB live, 60.3MiB allocated; 10ms collecting garbage
Compiler: Compiled 39 583 to 4 817 computations (87.8% saved)

prune9.0ms (0.2%)

Memory

5.6MiB live, 13.5MiB allocated; 0ms collecting garbage

Pruning

5 alts after pruning (5 fresh and 0 done)

	Pruned	Kept	Total
New	664	5	669
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	665	5	670

Accuracy

100.0%

Counts

670 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	82.4%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (.f64 (/.f64 (.f64 l l) (.f64 Om Om)) #s(literal 4 binary64))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
▶	91.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 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) Om)))))))
▶	98.9%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
▶	63.2%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))))
▶	55.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))

Compiler

Compiled 212 to 112 computations (47.2% saved)

series181.0ms (4.4%)

Memory

0.0MiB live, 116.9MiB allocated; 11ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2307	49218

Stop Event

1×	iter-limit

Counts

59 → 434

Calls

Call 1

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

Outputs
#s(approx 1 #s(literal 0 binary64))
#s(approx l l)
#s(approx (* 2 l) (*.f64 #s(literal 2 binary64) l))
#s(approx (/ (* 2 l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (pow (/ (* 2 l) Om) 2) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (/ l Om) (/.f64 l Om))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (pow.f64 l #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 Om #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 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* l l) (pow.f64 l #s(literal 2 binary64)))
#s(approx (/ (* l l) (* Om Om)) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (* (/ l Om) 4) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))
#s(approx (* (* (/ l Om) 4) l) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) #s(literal 1/2 binary64))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 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 (pow.f64 l #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 Om #s(literal 2 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 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(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 (pow.f64 l #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 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal -1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) 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 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx 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 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 1 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))
#s(approx (* Om Om) (pow.f64 Om #s(literal 2 binary64)))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) Om))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) Om))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) Om))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) Om))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/32 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (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 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -1 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (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) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 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) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx kx 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 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* (cos (+ kx kx)) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (* (cos (+ kx kx)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* (cos (+ kx kx)) 1/2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- (* (cos (+ kx kx)) 1/2) 1/2) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- (* (cos (+ kx kx)) 1/2) 1/2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (- (* (cos (+ kx kx)) 1/2) 1/2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* (cos (+ kx kx)) 1/2) 1/2) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/315 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/45 binary64))))) #s(literal 1 binary64))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (* (cos (+ kx kx)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))
#s(approx (- (* (cos (+ kx kx)) 1/2) 1/2) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))) #s(literal 1/2 binary64)))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #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 Om #s(literal 2 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 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (cos (+ kx kx)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (* (cos (+ kx kx)) 1/2) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))
#s(approx (- (* (cos (+ kx kx)) 1/2) 1/2) (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))) #s(literal 1/2 binary64)))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx ky ky)
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin ky) (.f64 ky (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (.f64 #s(literal -1/5040 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (pow (sin ky) 2) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/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 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ ky ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- 1 (cos (+ ky ky))) (*.f64 #s(literal 2 binary64) (pow.f64 ky #s(literal 2 binary64))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 4/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (- 1 (cos (+ ky ky))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 4/45 binary64) (.f64 #s(literal -2/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (sin ky) (sin.f64 ky))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (- 1 (cos (+ ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (- 1 (cos (+ ky ky))) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky)))))
#s(approx (* 1/2 (- 1 (cos (+ ky ky)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))

Calls

12 calls:

Time	Variable	Point
8.0ms	Om	0
7.0ms	l	0
5.0ms	kx	inf
5.0ms	kx	0
5.0ms	ky	0

rewrite172.0ms (4.2%)

Memory

3.2MiB live, 86.4MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	74	909
0	125	903
1	562	797
2	2478	797
0	4165	797

Stop Event

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

Counts

59 → 1 091

Calls

Call 1

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

Outputs
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 1/2 binary64)
l
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 l l)) l)
(*.f64 l #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
(/.f64 (-.f64 (.f64 l l) (.f64 l l)) (-.f64 l l))
(/.f64 (+.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (+.f64 (.f64 l l) (-.f64 (.f64 l l) (*.f64 l l))))
(-.f64 l (neg.f64 l))
(+.f64 (.f64 l #s(literal 1 binary64)) (.f64 l #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) l) (.f64 #s(literal 1 binary64) l))
(+.f64 l l)
Om
(*.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 l l))
(.f64 (.f64 #s(literal -2 binary64) l) (/.f64 #s(literal -1 binary64) Om))
(*.f64 (/.f64 l Om) #s(literal 2 binary64))
(*.f64 (+.f64 l l) (/.f64 #s(literal 1 binary64) Om))
(.f64 l (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)))
(*.f64 l (/.f64 #s(literal 2 binary64) Om))
(*.f64 #s(literal 2 binary64) (/.f64 l Om))
(/.f64 (neg.f64 (*.f64 (+.f64 l l) #s(literal 1 binary64))) (neg.f64 Om))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -2 binary64) l))) (neg.f64 (neg.f64 (neg.f64 Om))))
(/.f64 (*.f64 (+.f64 l l) #s(literal 1 binary64)) Om)
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) l)) (neg.f64 (neg.f64 Om)))
(/.f64 (*.f64 #s(literal -2 binary64) l) (neg.f64 Om))
(/.f64 (+.f64 l l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (*.f64 #s(literal -2 binary64) l)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 l l)))
(neg.f64 (/.f64 (+.f64 l l) (neg.f64 Om)))
(neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) l) Om))
(+.f64 (/.f64 l Om) (/.f64 l Om))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))) (fabs.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))))
(*.f64 (neg.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))) (neg.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))))
(*.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 l l) Om))) (neg.f64 (neg.f64 (/.f64 (+.f64 l l) Om))))
(.f64 (.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64)) (/.f64 l Om))
(.f64 (.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.f64 (+.f64 l l) (neg.f64 Om)) (/.f64 (+.f64 l l) (neg.f64 Om)))
(.f64 (/.f64 (.f64 #s(literal -2 binary64) l) Om) (/.f64 (*.f64 #s(literal -2 binary64) l) Om))
(.f64 (/.f64 (.f64 l l) (fabs.f64 Om)) (/.f64 #s(literal 4 binary64) (fabs.f64 Om)))
(.f64 (/.f64 (.f64 (neg.f64 l) l) Om) (/.f64 #s(literal 4 binary64) (neg.f64 Om)))
(.f64 (.f64 (+.f64 l l) (+.f64 l l)) (pow.f64 (/.f64 #s(literal -1 binary64) Om) #s(literal 2 binary64)))
(.f64 (.f64 (+.f64 l l) (+.f64 l l)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) (fabs.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (neg.f64 (/.f64 (+.f64 l l) Om)) (neg.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (/.f64 (+.f64 l l) Om))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))
(.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om Om)))
(.f64 (.f64 l (/.f64 l Om)) (/.f64 #s(literal 4 binary64) Om))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (*.f64 (+.f64 l l) (+.f64 l l)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (+.f64 l l) Om) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 l Om))
(.f64 (.f64 (/.f64 l (*.f64 Om Om)) l) (pow.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 l (*.f64 Om Om)) l) #s(literal 4 binary64))
(.f64 (.f64 l l) (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) #s(literal 2 binary64)))
(.f64 (.f64 l l) (pow.f64 (/.f64 #s(literal 2 binary64) Om) #s(literal 2 binary64)))
(.f64 (.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) #s(literal 4 binary64)))
(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (/.f64 l Om) (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (+.f64 l l) Om)))
(.f64 l (.f64 (/.f64 l (*.f64 Om Om)) #s(literal 4 binary64)))
(.f64 l (/.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) Om))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) (/.f64 (+.f64 l l) Om)))
(pow.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(literal -2 binary64) l))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(literal 4 binary64) (.f64 l (/.f64 l Om)))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(literal 4 binary64) (.f64 (neg.f64 l) l))) (*.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal -2 binary64) l) (/.f64 (+.f64 l l) Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 (neg.f64 l) l) #s(literal 4 binary64))) (*.f64 Om Om))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om))) (neg.f64 (fabs.f64 Om)))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal -2 binary64) l) (+.f64 l l))) (*.f64 Om Om))
(/.f64 (neg.f64 (.f64 (+.f64 l l) (.f64 #s(literal -2 binary64) l))) (*.f64 Om Om))
(/.f64 (neg.f64 (.f64 (+.f64 l l) (+.f64 l l))) (.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64)))) (*.f64 Om Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l)) Om)
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l (/.f64 l Om))) Om)
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (neg.f64 l) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (/.f64 (+.f64 l l) Om)) (neg.f64 Om))
(/.f64 (*.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) Om)
(/.f64 (.f64 (.f64 (neg.f64 l) l) #s(literal 4 binary64)) (*.f64 (neg.f64 Om) Om))
(/.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om)) (fabs.f64 Om))
(/.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (+.f64 l l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 (neg.f64 Om) Om))
(/.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) #s(literal 4 binary64)) (*.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) Om)
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 (*.f64 l l) #s(literal 4 binary64))))
(fabs.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64)))
kx
ky
(sin.f64 ky)
(*.f64 (fabs.f64 (fabs.f64 (sin.f64 ky))) (fabs.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (fabs.f64 (sin.f64 ky))) (neg.f64 (fabs.f64 (sin.f64 ky))))
(*.f64 (neg.f64 (neg.f64 (sin.f64 ky))) (neg.f64 (neg.f64 (sin.f64 ky))))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(fabs.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) Om) l)
(*.f64 (neg.f64 l) (/.f64 #s(literal -1 binary64) Om))
(*.f64 l (/.f64 #s(literal 1 binary64) Om))
(/.f64 (neg.f64 (*.f64 l #s(literal 1 binary64))) (neg.f64 Om))
(/.f64 (neg.f64 (neg.f64 (neg.f64 l))) (neg.f64 (neg.f64 (neg.f64 Om))))
(/.f64 (*.f64 l #s(literal 1 binary64)) Om)
(/.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 l) (neg.f64 Om))
(/.f64 l Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (neg.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 Om l))
(neg.f64 (/.f64 (neg.f64 l) Om))
(neg.f64 (/.f64 l (neg.f64 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))))))) #s(literal 2 binary64))
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
(.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(pow.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(fabs.f64 #s(approx (* (/ 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 (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 l))) (neg.f64 (neg.f64 (fabs.f64 l))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 l))) (neg.f64 (neg.f64 (neg.f64 l))))
(*.f64 (pow.f64 (fabs.f64 l) #s(literal 1 binary64)) (pow.f64 (fabs.f64 l) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 l) #s(literal 1 binary64)) (fabs.f64 l))
(*.f64 (pow.f64 (neg.f64 l) #s(literal 1 binary64)) (pow.f64 (neg.f64 l) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 l) #s(literal 1 binary64)) (neg.f64 l))
(*.f64 (pow.f64 l (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 l (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) l)
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (neg.f64 (fabs.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 l)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 (*.f64 l l) #s(literal 1 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 l) #s(literal 1 binary64)) (pow.f64 (fabs.f64 l) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 l) #s(literal 1 binary64)) (pow.f64 (neg.f64 l) #s(literal -1 binary64)))
(/.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 l) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 l) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 l) l))
(sqrt.f64 (.f64 (.f64 l l) (*.f64 l l)))
(fabs.f64 (*.f64 (neg.f64 l) l))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 (fabs.f64 l)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 l)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 Om))) (neg.f64 (neg.f64 (fabs.f64 Om))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 Om))) (neg.f64 (neg.f64 (neg.f64 Om))))
(*.f64 (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)) (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)) (fabs.f64 Om))
(*.f64 (pow.f64 (neg.f64 Om) #s(literal 1 binary64)) (pow.f64 (neg.f64 Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 Om) #s(literal 1 binary64)) (neg.f64 Om))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 Om Om))
(.f64 (.f64 #s(literal -1 binary64) Om) (*.f64 #s(literal -1 binary64) Om))
(*.f64 (pow.f64 Om (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 Om (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 Om)) (neg.f64 (fabs.f64 Om)))
(*.f64 (neg.f64 (neg.f64 Om)) (neg.f64 (neg.f64 Om)))
(*.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Om #s(literal 1 binary64)))
(*.f64 (pow.f64 Om #s(literal 1 binary64)) Om)
(*.f64 (fabs.f64 Om) (fabs.f64 Om))
(*.f64 (neg.f64 Om) (neg.f64 Om))
(.f64 (.f64 Om Om) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 Om Om)
(pow.f64 (neg.f64 (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 Om)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 Om) #s(literal 2 binary64))
(pow.f64 (neg.f64 Om) #s(literal 2 binary64))
(pow.f64 (*.f64 Om Om) #s(literal 1 binary64))
(pow.f64 Om #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 Om)))
(/.f64 (pow.f64 (neg.f64 Om) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) Om))
(/.f64 (pow.f64 Om #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(neg.f64 (*.f64 (neg.f64 Om) Om))
(sqrt.f64 (.f64 (.f64 Om Om) (*.f64 Om Om)))
(fabs.f64 (*.f64 (neg.f64 Om) Om))
(fabs.f64 (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 (fabs.f64 Om)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 Om)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 Om) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (/.f64 (fabs.f64 l) (neg.f64 Om))) (fabs.f64 (/.f64 (fabs.f64 l) (neg.f64 Om))))
(*.f64 (fabs.f64 (/.f64 (fabs.f64 l) Om)) (fabs.f64 (/.f64 (fabs.f64 l) Om)))
(*.f64 (fabs.f64 (/.f64 (neg.f64 l) (fabs.f64 Om))) (fabs.f64 (/.f64 (neg.f64 l) (fabs.f64 Om))))
(*.f64 (fabs.f64 (/.f64 l (fabs.f64 Om))) (fabs.f64 (/.f64 l (fabs.f64 Om))))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 l Om))) (fabs.f64 (fabs.f64 (/.f64 l Om))))
(*.f64 (neg.f64 (/.f64 (fabs.f64 l) (neg.f64 Om))) (neg.f64 (/.f64 (fabs.f64 l) (neg.f64 Om))))
(*.f64 (neg.f64 (/.f64 (fabs.f64 l) Om)) (neg.f64 (/.f64 (fabs.f64 l) Om)))
(*.f64 (neg.f64 (/.f64 (neg.f64 l) (fabs.f64 Om))) (neg.f64 (/.f64 (neg.f64 l) (fabs.f64 Om))))
(*.f64 (neg.f64 (/.f64 l (fabs.f64 Om))) (neg.f64 (/.f64 l (fabs.f64 Om))))
(*.f64 (neg.f64 (fabs.f64 (/.f64 l Om))) (neg.f64 (fabs.f64 (/.f64 l Om))))
(*.f64 (neg.f64 (neg.f64 (/.f64 l Om))) (neg.f64 (neg.f64 (/.f64 l Om))))
(*.f64 (pow.f64 (/.f64 l Om) #s(literal 1 binary64)) (pow.f64 (/.f64 l Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 l Om) #s(literal 1 binary64)) (/.f64 l Om))
(.f64 (.f64 (/.f64 l Om) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (fabs.f64 (/.f64 l Om)) (fabs.f64 (/.f64 l Om)))
(*.f64 (/.f64 (fabs.f64 l) (neg.f64 Om)) (/.f64 (fabs.f64 l) (neg.f64 Om)))
(*.f64 (/.f64 (fabs.f64 l) Om) (/.f64 (fabs.f64 l) Om))
(*.f64 (/.f64 (neg.f64 l) (fabs.f64 Om)) (/.f64 (neg.f64 l) (fabs.f64 Om)))
(*.f64 (/.f64 (neg.f64 l) Om) (/.f64 (neg.f64 l) Om))
(*.f64 (/.f64 l (fabs.f64 Om)) (/.f64 l (fabs.f64 Om)))
(*.f64 (/.f64 l (neg.f64 Om)) (/.f64 l (neg.f64 Om)))
(*.f64 (neg.f64 (/.f64 l Om)) (neg.f64 (/.f64 l Om)))
(.f64 (.f64 l (/.f64 l Om)) (/.f64 #s(literal 1 binary64) Om))
(.f64 (/.f64 l (.f64 Om Om)) l)
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (*.f64 l l))
(.f64 (.f64 (neg.f64 l) l) (/.f64 #s(literal -1 binary64) (*.f64 Om Om)))
(.f64 (fabs.f64 l) (.f64 (fabs.f64 l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(.f64 (fabs.f64 l) (/.f64 (fabs.f64 l) (.f64 Om Om)))
(.f64 (neg.f64 l) (.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(.f64 (neg.f64 l) (/.f64 l (.f64 (neg.f64 Om) Om)))
(.f64 (.f64 l l) (pow.f64 (/.f64 #s(literal -1 binary64) Om) #s(literal 2 binary64)))
(.f64 (.f64 l l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 l Om) (/.f64 l Om))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 l Om)))
(.f64 l (/.f64 l (.f64 Om Om)))
(pow.f64 (fabs.f64 (/.f64 l Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fabs.f64 l) (neg.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fabs.f64 l) Om) #s(literal 2 binary64))
(pow.f64 (/.f64 (neg.f64 l) (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (neg.f64 l) Om) #s(literal 2 binary64))
(pow.f64 (/.f64 l (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 l (neg.f64 Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (/.f64 l Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 l Om) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 1 binary64))) (*.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (*.f64 (/.f64 l Om) (neg.f64 l))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 (/.f64 l Om) l)) (neg.f64 Om))
(/.f64 (neg.f64 (*.f64 (neg.f64 l) (/.f64 l Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (/.f64 (*.f64 l l) (fabs.f64 Om))) (neg.f64 (fabs.f64 Om)))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 l) l) Om)) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (neg.f64 (*.f64 l (/.f64 l Om)))) (neg.f64 (neg.f64 Om)))
(/.f64 (pow.f64 (/.f64 l Om) #s(literal 1 binary64)) (pow.f64 (/.f64 l Om) #s(literal -1 binary64)))
(/.f64 (.f64 (.f64 l l) #s(literal 1 binary64)) (*.f64 Om Om))
(/.f64 (*.f64 (/.f64 l Om) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 l Om) l) Om)
(/.f64 (*.f64 (neg.f64 l) (/.f64 l Om)) (neg.f64 Om))
(/.f64 (/.f64 (*.f64 l l) (fabs.f64 Om)) (fabs.f64 Om))
(/.f64 (/.f64 (*.f64 (neg.f64 l) l) Om) (neg.f64 Om))
(/.f64 (neg.f64 (*.f64 l (/.f64 l Om))) (neg.f64 Om))
(/.f64 (*.f64 l (/.f64 l Om)) Om)
(/.f64 (.f64 (neg.f64 l) l) (.f64 (neg.f64 Om) Om))
(/.f64 (.f64 l l) (.f64 Om Om))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 l Om) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 l (/.f64 l Om))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 Om) Om) (.f64 (neg.f64 l) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 l l)))
(neg.f64 (/.f64 (.f64 (neg.f64 l) l) (.f64 Om Om)))
(fabs.f64 (.f64 (/.f64 l (.f64 Om Om)) l))
(exp.f64 (*.f64 (log.f64 (/.f64 l Om)) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 4 binary64)))
(*.f64 l (/.f64 #s(literal 4 binary64) Om))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (neg.f64 l))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 (neg.f64 l) #s(literal 4 binary64))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 4 binary64) l))) (neg.f64 (neg.f64 Om)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (neg.f64 l) #s(literal 4 binary64)) (neg.f64 Om))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 #s(literal 4 binary64) l)))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l Om))
(.f64 (.f64 l (/.f64 l Om)) #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(.f64 #s(literal 4 binary64) (.f64 (/.f64 l Om) l))
(.f64 (/.f64 l Om) (.f64 #s(literal 4 binary64) l))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 #s(literal 4 binary64) l)))
(.f64 l (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) l)) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (neg.f64 l) (.f64 #s(literal 4 binary64) l))) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) l) l) Om)
(/.f64 (.f64 (neg.f64 l) (.f64 #s(literal 4 binary64) l)) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) (neg.f64 Om))
(/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) Om)
(*.f64 (fabs.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))) (fabs.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))))
(*.f64 (neg.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))) (neg.f64 (fabs.f64 (/.f64 (+.f64 l l) Om))))
(*.f64 (neg.f64 (neg.f64 (/.f64 (+.f64 l l) Om))) (neg.f64 (neg.f64 (/.f64 (+.f64 l l) Om))))
(.f64 (.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64)) (/.f64 l Om))
(.f64 (.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.f64 (+.f64 l l) (neg.f64 Om)) (/.f64 (+.f64 l l) (neg.f64 Om)))
(.f64 (/.f64 (.f64 #s(literal -2 binary64) l) Om) (/.f64 (*.f64 #s(literal -2 binary64) l) Om))
(.f64 (/.f64 (.f64 l l) (fabs.f64 Om)) (/.f64 #s(literal 4 binary64) (fabs.f64 Om)))
(.f64 (/.f64 (.f64 (neg.f64 l) l) Om) (/.f64 #s(literal 4 binary64) (neg.f64 Om)))
(.f64 (.f64 (+.f64 l l) (+.f64 l l)) (pow.f64 (/.f64 #s(literal -1 binary64) Om) #s(literal 2 binary64)))
(.f64 (.f64 (+.f64 l l) (+.f64 l l)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) (fabs.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (neg.f64 (/.f64 (+.f64 l l) Om)) (neg.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (/.f64 (+.f64 l l) Om))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))
(.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om Om)))
(.f64 (.f64 l (/.f64 l Om)) (/.f64 #s(literal 4 binary64) Om))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (*.f64 (+.f64 l l) (+.f64 l l)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (+.f64 l l) Om) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 l Om))
(.f64 (.f64 (/.f64 l (*.f64 Om Om)) l) (pow.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 l (*.f64 Om Om)) l) #s(literal 4 binary64))
(.f64 (.f64 l l) (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) #s(literal 2 binary64)))
(.f64 (.f64 l l) (pow.f64 (/.f64 #s(literal 2 binary64) Om) #s(literal 2 binary64)))
(.f64 (.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) #s(literal 4 binary64)))
(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (/.f64 l Om) (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (+.f64 l l) Om)))
(.f64 l (.f64 (/.f64 l (*.f64 Om Om)) #s(literal 4 binary64)))
(.f64 l (/.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) Om))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) (/.f64 (+.f64 l l) Om)))
(pow.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(literal -2 binary64) l))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(literal 4 binary64) (.f64 l (/.f64 l Om)))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(literal 4 binary64) (.f64 (neg.f64 l) l))) (*.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal -2 binary64) l) (/.f64 (+.f64 l l) Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (*.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 (neg.f64 l) l) #s(literal 4 binary64))) (*.f64 Om Om))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om))) (neg.f64 (fabs.f64 Om)))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal -2 binary64) l) (+.f64 l l))) (*.f64 Om Om))
(/.f64 (neg.f64 (.f64 (+.f64 l l) (.f64 #s(literal -2 binary64) l))) (*.f64 Om Om))
(/.f64 (neg.f64 (.f64 (+.f64 l l) (+.f64 l l))) (.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64)))) (*.f64 Om Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l)) Om)
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l (/.f64 l Om))) Om)
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (neg.f64 l) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (/.f64 (+.f64 l l) Om)) (neg.f64 Om))
(/.f64 (*.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) Om)
(/.f64 (.f64 (.f64 (neg.f64 l) l) #s(literal 4 binary64)) (*.f64 (neg.f64 Om) Om))
(/.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om)) (fabs.f64 Om))
(/.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (+.f64 l l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 (neg.f64 Om) Om))
(/.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) #s(literal 4 binary64)) (*.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) Om)
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 (*.f64 l l) #s(literal 4 binary64))))
(fabs.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 kx #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) kx)
(/.f64 (-.f64 (.f64 kx kx) (.f64 (neg.f64 kx) (neg.f64 kx))) (+.f64 kx (neg.f64 kx)))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 kx) #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (+.f64 (.f64 (neg.f64 kx) (neg.f64 kx)) (*.f64 kx (neg.f64 kx)))))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (-.f64 (.f64 kx kx) (*.f64 kx kx))))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(-.f64 kx (neg.f64 kx))
(+.f64 kx (neg.f64 (neg.f64 kx)))
(+.f64 kx kx)
(*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (cos.f64 (-.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(neg.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))
(-.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (fabs.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 kx kx))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))
(+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 ky #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) ky)
(/.f64 (-.f64 (.f64 ky ky) (.f64 (neg.f64 ky) (neg.f64 ky))) (+.f64 ky (neg.f64 ky)))
(/.f64 (-.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 ky) #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (+.f64 (.f64 (neg.f64 ky) (neg.f64 ky)) (*.f64 ky (neg.f64 ky)))))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 ky ky))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 ky #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (-.f64 (.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(-.f64 ky (neg.f64 ky))
(+.f64 ky (neg.f64 (neg.f64 ky)))
(+.f64 ky ky)
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))) (cos.f64 (-.f64 ky ky)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (.f64 (sin.f64 ky) (sin.f64 (neg.f64 (neg.f64 ky)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) ky) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 ky ky) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 ky ky))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (neg.f64 (cos.f64 (+.f64 ky ky)))) (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 ky ky)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))))
(neg.f64 (+.f64 #s(literal -1 binary64) (cos.f64 (+.f64 ky ky))))
(neg.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))
(+.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64))
(+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 ky ky))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 ky ky)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))) (+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))))))
(neg.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))
(-.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal 1/2 binary64))
(+.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (/.f64 l Om)) (.f64 #s(literal 4 binary64) l))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) l) (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 l Om))) l)
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) (.f64 l (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))
(.f64 (/.f64 l Om) (.f64 (.f64 #s(literal 4 binary64) l) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))
(.f64 l (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 l Om))))
(neg.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) #s(literal 4 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 l Om))) (/.f64 l Om))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l)) #s(literal 4 binary64))
(.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (/.f64 #s(literal -1 binary64) Om))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) Om)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) Om))
(.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))
(.f64 #s(literal 4 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 l l) #s(literal 4 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 Om Om))
(/.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) Om)
(/.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (*.f64 Om Om))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 (neg.f64 Om))))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (*.f64 #s(literal -1 binary64) Om))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (neg.f64 Om))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(neg.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))))
(neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) #s(literal 4 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 #s(literal 4 binary64) (/.f64 l Om))) (/.f64 l Om))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l)) #s(literal 4 binary64))
(.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (/.f64 #s(literal -1 binary64) Om))
(.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) Om)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) Om))
(.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 #s(literal 4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))
(.f64 #s(literal 4 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 l l) #s(literal 4 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 Om Om))
(/.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) Om)
(/.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (*.f64 Om Om))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (neg.f64 (neg.f64 (neg.f64 Om))))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (*.f64 #s(literal -1 binary64) Om))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))) (neg.f64 Om))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(neg.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))))
(neg.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (/.f64 #s(literal 1 binary64) Om))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))) (neg.f64 Om))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (neg.f64 Om))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om)
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(neg.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal -1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(sqrt.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(+.f64 (/.f64 Om Om) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) Om)))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))) (sqrt.f64 (neg.f64 Om)))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))) (sqrt.f64 (neg.f64 Om)))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(fabs.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal -1/2 binary64) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(sqrt.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))))
(fabs.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 1 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (/.f64 #s(literal 1 binary64) Om))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))) (neg.f64 (neg.f64 Om)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)))) (neg.f64 Om))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))) (+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (neg.f64 Om))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om)
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(neg.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal -1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(sqrt.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(+.f64 (/.f64 Om Om) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) Om)))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64))))) (sqrt.f64 (neg.f64 Om)))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))) (sqrt.f64 (neg.f64 Om)))
(/.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(fabs.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal -1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(sqrt.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))))
(fabs.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 1 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (.f64 #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 2 binary64))))) (neg.f64 (sqrt.f64 (.f64 #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 2 binary64))))))
(.f64 (sqrt.f64 (.f64 #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 2 binary64)))) (sqrt.f64 (.f64 #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 2 binary64)))))
(.f64 (.f64 #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 2 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #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))))
(.f64 #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 2 binary64)))
(.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1 binary64) (.f64 #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 2 binary64))))
(pow.f64 (.f64 (.f64 #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 2 binary64))) (.f64 #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 2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (.f64 #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 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (.f64 #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 2 binary64))) #s(literal 1 binary64))
(neg.f64 (.f64 #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 2 binary64))))
(neg.f64 (.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (.f64 #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 2 binary64))) (.f64 #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 2 binary64)))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 #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 2 binary64))))) (sqrt.f64 (.f64 #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 2 binary64))))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 #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 2 binary64)))) (neg.f64 (sqrt.f64 (.f64 #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 2 binary64)))))))
(fabs.f64 (.f64 #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 2 binary64))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 #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 2 binary64))))) (sqrt.f64 (sqrt.f64 (.f64 #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 2 binary64))))))
(.f64 (sqrt.f64 (.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (.f64 #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 2 binary64)))))
(.f64 (pow.f64 (.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #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 2 binary64)))))
(.f64 (pow.f64 (.f64 #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 2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 #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 2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #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(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #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)))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(approx (+ 1 (/ 1 (sqrt (+ 1 ( (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (.f64 #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 2 binary64)))) (sqrt.f64 #s(literal 1 binary64)))
(.f64 (sqrt.f64 (.f64 #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 2 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (.f64 #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 2 binary64))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (.f64 #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 2 binary64))) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 #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 2 binary64))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 #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 2 binary64)))))))
(fabs.f64 (neg.f64 (sqrt.f64 (.f64 #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 2 binary64))))))
(fabs.f64 (sqrt.f64 (.f64 #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 2 binary64)))))
(exp.f64 (.f64 (log.f64 (.f64 #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 2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (/.f64 (+.f64 l l) Om)) (/.f64 (+.f64 l l) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky))))))
(.f64 (/.f64 (+.f64 l l) Om) (.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))
(.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 2 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))))) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky))))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky))))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky))))))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om))))))))
(neg.f64 (-.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))) #s(literal 1 binary64)))
(-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))))
(sqrt.f64 (.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky)))))))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 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 ky ky))))))))
(+.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(fabs.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(pow.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64))))))
(sqrt.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
(fabs.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))) (sqrt.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 1 binary64)))
(.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))

eval144.0ms (3.5%)

Memory: 7.2MiB live, 129.5MiB allocated; 16ms collecting garbage
Compiler: Compiled 82 572 to 10 104 computations (87.8% saved)

prune18.0ms (0.4%)

Memory

3.5MiB live, 28.4MiB allocated; 1ms collecting garbage

Pruning

8 alts after pruning (7 fresh and 1 done)

	Pruned	Kept	Total
New	1 441	7	1 448
Fresh	0	0	0
Picked	4	1	5
Done	0	0	0
Total	1 445	8	1 453

Accuracy

100.0%

Counts

1 453 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	55.2%	(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
	91.2%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om))) #s(literal -1/2 binary64)))
▶	61.9%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.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 Om Om)) #s(literal 4 binary64))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
▶	70.1%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (.f64 (.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) Om)))))))
	73.5%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (pow (sin ky) 2) (pow.f64 ky #s(literal 2 binary64)))))))))))
▶	92.6%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (+.f64 l l) Om) (.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))))))
▶	63.2%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))
✓	55.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))

Compiler

Compiled 308 to 160 computations (48.1% saved)

series192.0ms (4.7%)

Memory

-6.2MiB live, 126.5MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2632	60954

Stop Event

1×	iter-limit

Counts

58 → 478

Calls

Call 1

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

Outputs
#s(approx 1 #s(literal 0 binary64))
#s(approx l l)
#s(approx (/ l Om) (/.f64 l Om))
#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 (pow.f64 l #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 Om #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 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (+ l l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* l l) (pow.f64 l #s(literal 2 binary64)))
#s(approx (/ (+ l l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (/ (* l l) (* Om Om)) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (* (/ l Om) 4) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))
#s(approx (* (* (/ l Om) 4) l) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)))
#s(approx (* (/ (* l l) (* Om Om)) 4) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (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 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (sqrt (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 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) Om)))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) #s(literal 1/2 binary64))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 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 #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 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #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 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1/8 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1/8 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 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 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 l #s(literal 2 binary64)))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 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 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (pow.f64 l #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 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)))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) 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 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) 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 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) 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 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (-.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 l (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) l))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 l (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))))))) l)) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) l))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (-.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 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 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 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 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal -1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx 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/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))
#s(approx (* Om Om) (pow.f64 Om #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #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 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 Om (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (.f64 Om (+.f64 (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 Om (+.f64 (.f64 Om (+.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #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 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 Om (+.f64 (.f64 Om (+.f64 (.f64 #s(literal -1 binary64) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 (sqrt.f64 (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 2 binary64))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) Om))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) Om))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) Om))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) Om))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) Om))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/32 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (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 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (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 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (sqrt (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 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 #s(literal 1 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -1 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -4 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx kx kx)
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (* 2 kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (* 2 kx)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (cos (* 2 kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (* 2 kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (* 2 kx))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (* 2 kx)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) l) Om))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) l) Om)) (.f64 #s(literal 2 binary64) (/.f64 l Om))))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 l Om)) (.f64 #s(literal 4/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) l) Om))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #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 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))))))
#s(approx (cos (* 2 kx)) (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 (- 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 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx ky 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 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 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)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (+ ky ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 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 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #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 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))))))
#s(approx (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64)))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64))))
#s(approx (* (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))))) (pow.f64 (sqrt.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))) #s(literal 2 binary64))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) l) Om))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) l) Om)) (.f64 #s(literal 2 binary64) (/.f64 l Om))))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 l Om)) (.f64 #s(literal 4/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) l) Om))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (* 1/2 (cos (+ ky ky))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (* 1/2 (cos (+ ky ky))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (/ (* l l) (* Om Om)) 4)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om)))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (/ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* (/ l Om) 4) l)) Om))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))

Calls

12 calls:

Time	Variable	Point
13.0ms	l	0
6.0ms	ky	inf
6.0ms	Om	0
5.0ms	kx	inf
4.0ms	l	inf

rewrite172.0ms (4.2%)

Memory

0.4MiB live, 86.2MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	82	1180
0	129	992
1	655	842
2	2866	842
0	4040	842

Stop Event

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

Counts

58 → 977

Calls

Call 1

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

Outputs
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 1/2 binary64)
l
Om
kx
ky
(*.f64 (/.f64 #s(literal 1 binary64) Om) l)
(*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(*.f64 l (/.f64 #s(literal 1 binary64) Om))
(/.f64 (*.f64 l #s(literal 1 binary64)) Om)
(/.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 l) (neg.f64 Om))
(/.f64 l Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (neg.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 Om l))
(neg.f64 (/.f64 (neg.f64 l) Om))
(neg.f64 (/.f64 l (neg.f64 Om)))
#s(literal 4 binary64)
#s(literal -1 binary64)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
(.f64 (pow.f64 (.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 0 binary64)))
(pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(sqrt.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(fabs.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 4 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) l)) l)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 l l)) l)
(*.f64 l #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
(/.f64 (-.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (.f64 l l) (+.f64 (.f64 l l) (*.f64 (neg.f64 l) l))))
(/.f64 (-.f64 (.f64 l l) (.f64 l l)) (+.f64 l (neg.f64 l)))
(/.f64 (-.f64 (.f64 l l) (.f64 l l)) (-.f64 l l))
(/.f64 (+.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (+.f64 (.f64 l l) (-.f64 (.f64 l l) (*.f64 l l))))
(neg.f64 (*.f64 #s(literal -2 binary64) l))
(-.f64 l (neg.f64 l))
(+.f64 (.f64 l #s(literal 1 binary64)) (.f64 l #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) l) (.f64 #s(literal 1 binary64) l))
(+.f64 l (neg.f64 (neg.f64 l)))
(+.f64 l l)
(*.f64 (pow.f64 (fabs.f64 l) #s(literal 1 binary64)) (pow.f64 (fabs.f64 l) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 l) #s(literal 1 binary64)) (fabs.f64 l))
(*.f64 (pow.f64 (neg.f64 l) #s(literal 1 binary64)) (pow.f64 (neg.f64 l) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 l) #s(literal 1 binary64)) (neg.f64 l))
(*.f64 (pow.f64 l (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 l (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) l)
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (fabs.f64 (fabs.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 l)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 l)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 l #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 l) #s(literal 1 binary64)) (pow.f64 (fabs.f64 l) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 l) #s(literal 1 binary64)) (pow.f64 (neg.f64 l) #s(literal -1 binary64)))
(/.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 l) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 l) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 l) l))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 (fabs.f64 l)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 l)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 l Om) (/.f64 l Om))) (/.f64 l Om))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 l l))
(.f64 (.f64 #s(literal -2 binary64) l) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(*.f64 (+.f64 l l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.f64 l Om) #s(literal 2 binary64))
(.f64 l (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)))
(*.f64 l (/.f64 #s(literal 2 binary64) Om))
(*.f64 l (+.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 #s(literal 1 binary64) Om)))
(*.f64 #s(literal 2 binary64) (/.f64 l Om))
(/.f64 (*.f64 (+.f64 l l) #s(literal 1 binary64)) Om)
(/.f64 (+.f64 (*.f64 (/.f64 l Om) (neg.f64 Om)) (neg.f64 l)) (neg.f64 Om))
(/.f64 (+.f64 (*.f64 (/.f64 l Om) Om) l) Om)
(/.f64 (+.f64 (.f64 (neg.f64 l) (neg.f64 Om)) (.f64 (neg.f64 l) (neg.f64 Om))) (*.f64 Om Om))
(/.f64 (+.f64 (.f64 (neg.f64 l) Om) (.f64 l (neg.f64 Om))) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l (neg.f64 Om)) (.f64 (neg.f64 l) Om)) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l Om) (.f64 l Om)) (*.f64 Om Om))
(/.f64 (-.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 (/.f64 l (.f64 Om Om)) l)) (-.f64 (/.f64 l Om) (/.f64 l Om)))
(/.f64 (+.f64 (pow.f64 (/.f64 l Om) #s(literal 3 binary64)) (pow.f64 (/.f64 l Om) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (-.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 (/.f64 l (.f64 Om Om)) l))))
(/.f64 (+.f64 (.f64 (neg.f64 l) (neg.f64 Om)) (.f64 (neg.f64 Om) (neg.f64 l))) (*.f64 Om Om))
(/.f64 (+.f64 (.f64 (neg.f64 l) Om) (.f64 (neg.f64 Om) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l (neg.f64 Om)) (.f64 Om (neg.f64 l))) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l Om) (.f64 Om l)) (*.f64 Om Om))
(/.f64 (*.f64 #s(literal -2 binary64) l) (neg.f64 Om))
(/.f64 (+.f64 l l) (neg.f64 (neg.f64 Om)))
(/.f64 (+.f64 l l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (*.f64 #s(literal -2 binary64) l)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 l l)))
(neg.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)))
(-.f64 (/.f64 l Om) (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) Om)))
(-.f64 (/.f64 l Om) (/.f64 (neg.f64 l) Om))
(-.f64 (/.f64 l Om) (neg.f64 (/.f64 l Om)))
(+.f64 (/.f64 l Om) (/.f64 l Om))
(*.f64 (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)) (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)) (fabs.f64 Om))
(*.f64 (pow.f64 (neg.f64 Om) #s(literal 1 binary64)) (pow.f64 (neg.f64 Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 Om) #s(literal 1 binary64)) (neg.f64 Om))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 Om Om))
(*.f64 (pow.f64 Om (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 Om (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 Om)) (fabs.f64 (fabs.f64 Om)))
(*.f64 (neg.f64 (fabs.f64 Om)) (neg.f64 (fabs.f64 Om)))
(*.f64 (neg.f64 (neg.f64 Om)) (neg.f64 (neg.f64 Om)))
(*.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Om #s(literal 1 binary64)))
(*.f64 (pow.f64 Om #s(literal 1 binary64)) Om)
(*.f64 (fabs.f64 Om) (fabs.f64 Om))
(*.f64 (neg.f64 Om) (neg.f64 Om))
(.f64 (.f64 Om Om) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 Om Om)
(pow.f64 (fabs.f64 (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 Om)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 Om) #s(literal 2 binary64))
(pow.f64 (neg.f64 Om) #s(literal 2 binary64))
(pow.f64 Om #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 Om) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 Om)))
(/.f64 (pow.f64 (neg.f64 Om) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(/.f64 (pow.f64 Om #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(neg.f64 (*.f64 (neg.f64 Om) Om))
(fabs.f64 (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 (fabs.f64 Om)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 Om)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 Om) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 l Om) #s(literal 1 binary64)) (pow.f64 (/.f64 l Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 l Om) #s(literal 1 binary64)) (/.f64 l Om))
(.f64 (.f64 (/.f64 l Om) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.f64 (fabs.f64 l) (fabs.f64 Om)) (/.f64 (fabs.f64 l) (fabs.f64 Om)))
(*.f64 (/.f64 (fabs.f64 l) (neg.f64 Om)) (/.f64 (fabs.f64 l) (neg.f64 Om)))
(*.f64 (/.f64 (fabs.f64 l) Om) (/.f64 (fabs.f64 l) Om))
(*.f64 (/.f64 (neg.f64 l) (fabs.f64 Om)) (/.f64 (neg.f64 l) (fabs.f64 Om)))
(*.f64 (/.f64 (neg.f64 l) Om) (/.f64 (neg.f64 l) Om))
(*.f64 (/.f64 l (fabs.f64 Om)) (/.f64 l (fabs.f64 Om)))
(*.f64 (/.f64 l (neg.f64 Om)) (/.f64 l (neg.f64 Om)))
(*.f64 (fabs.f64 (/.f64 l Om)) (fabs.f64 (/.f64 l Om)))
(*.f64 (neg.f64 (/.f64 l Om)) (neg.f64 (/.f64 l Om)))
(.f64 (.f64 l (/.f64 l Om)) (/.f64 #s(literal 1 binary64) Om))
(.f64 (/.f64 l (.f64 Om Om)) l)
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (*.f64 l l))
(.f64 (.f64 (neg.f64 l) l) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 Om) Om)))
(.f64 (fabs.f64 l) (.f64 (fabs.f64 l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(.f64 (fabs.f64 l) (/.f64 (fabs.f64 l) (.f64 Om Om)))
(.f64 (neg.f64 l) (.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(.f64 (neg.f64 l) (/.f64 (neg.f64 l) (.f64 Om Om)))
(.f64 (.f64 l l) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 Om)) #s(literal 2 binary64)))
(.f64 (.f64 l l) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 l Om) (/.f64 l Om))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 l Om)))
(.f64 l (/.f64 l (.f64 Om Om)))
(pow.f64 (/.f64 (fabs.f64 l) (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fabs.f64 l) (neg.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fabs.f64 l) Om) #s(literal 2 binary64))
(pow.f64 (/.f64 (neg.f64 l) (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (neg.f64 l) Om) #s(literal 2 binary64))
(pow.f64 (/.f64 l (fabs.f64 Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 l (neg.f64 Om)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (/.f64 l Om)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (/.f64 l Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 l Om) #s(literal 2 binary64))
(/.f64 (pow.f64 (/.f64 l Om) #s(literal 1 binary64)) (pow.f64 (/.f64 l Om) #s(literal -1 binary64)))
(/.f64 (.f64 (.f64 l l) #s(literal 1 binary64)) (*.f64 Om Om))
(/.f64 (*.f64 (/.f64 l Om) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 l Om) l) Om)
(/.f64 (*.f64 (neg.f64 l) (/.f64 l Om)) (neg.f64 Om))
(/.f64 (/.f64 (*.f64 l l) (fabs.f64 Om)) (fabs.f64 Om))
(/.f64 (/.f64 (*.f64 l l) (neg.f64 Om)) (neg.f64 Om))
(/.f64 (neg.f64 (*.f64 l (/.f64 l Om))) (neg.f64 Om))
(/.f64 (*.f64 l (/.f64 l Om)) Om)
(/.f64 (.f64 (neg.f64 l) l) (.f64 (neg.f64 Om) Om))
(/.f64 (.f64 l l) (.f64 Om Om))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 l Om) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 l (/.f64 l Om))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 Om) Om) (.f64 (neg.f64 l) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 l l)))
(neg.f64 (/.f64 (.f64 l l) (.f64 (neg.f64 Om) Om)))
(neg.f64 (/.f64 (.f64 (neg.f64 l) l) (.f64 Om Om)))
(exp.f64 (*.f64 (log.f64 (/.f64 l Om)) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 4 binary64)))
(*.f64 l (/.f64 #s(literal 4 binary64) Om))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (neg.f64 l) #s(literal 4 binary64)) (neg.f64 Om))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 #s(literal 4 binary64) l)))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l Om))
(.f64 (.f64 l (/.f64 l Om)) #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(.f64 #s(literal 4 binary64) (.f64 (/.f64 l Om) l))
(.f64 (/.f64 l Om) (.f64 #s(literal 4 binary64) l))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 #s(literal 4 binary64) l)))
(.f64 l (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) l) l) Om)
(/.f64 (.f64 (neg.f64 l) (.f64 #s(literal 4 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) Om)
(.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(literal -2 binary64) l)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 Om)) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64)) (/.f64 l Om))
(.f64 (.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 (/.f64 (.f64 l l) (fabs.f64 Om)) (/.f64 #s(literal 4 binary64) (fabs.f64 Om)))
(.f64 (/.f64 (.f64 l l) (neg.f64 Om)) (/.f64 #s(literal 4 binary64) (neg.f64 Om)))
(*.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) (fabs.f64 (/.f64 (+.f64 l l) Om)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 1 binary64)) (/.f64 (+.f64 l l) Om))
(.f64 (.f64 (+.f64 l l) (+.f64 l l)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (*.f64 Om Om)))
(.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om Om)))
(.f64 (.f64 l (/.f64 l Om)) (/.f64 #s(literal 4 binary64) Om))
(.f64 (.f64 #s(literal -2 binary64) (/.f64 l Om)) (*.f64 #s(literal -2 binary64) (/.f64 l Om)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (*.f64 (+.f64 l l) (+.f64 l l)))
(*.f64 (pow.f64 (/.f64 (+.f64 l l) Om) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (+.f64 l l) Om) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 l Om))
(.f64 (.f64 (/.f64 l (*.f64 Om Om)) l) (pow.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 l (*.f64 Om Om)) l) #s(literal 4 binary64))
(*.f64 (/.f64 (+.f64 l l) Om) (/.f64 (+.f64 l l) Om))
(.f64 (.f64 l l) (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) #s(literal 2 binary64)))
(.f64 (.f64 l l) (pow.f64 (/.f64 #s(literal 2 binary64) Om) #s(literal 2 binary64)))
(.f64 (.f64 l l) (pow.f64 (+.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 #s(literal 1 binary64) Om)) #s(literal 2 binary64)))
(.f64 (.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) #s(literal 4 binary64)))
(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (+.f64 l l) Om)))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (/.f64 l Om) (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(.f64 l (.f64 (/.f64 l (*.f64 Om Om)) #s(literal 4 binary64)))
(.f64 l (/.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) Om))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) (/.f64 (+.f64 l l) Om)))
(pow.f64 (fabs.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 l l) Om) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(literal -2 binary64) l)) (.f64 Om Om))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 l (/.f64 l Om))) Om)
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (neg.f64 l) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 (+.f64 l l) Om) (+.f64 l l)) Om)
(/.f64 (.f64 (.f64 (neg.f64 l) l) #s(literal 4 binary64)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (/.f64 (+.f64 l l) Om)) (neg.f64 Om))
(/.f64 (*.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) Om)
(/.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om)) (fabs.f64 Om))
(/.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (+.f64 l l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 (neg.f64 Om) Om))
(/.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 Om))
(/.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) (+.f64 l l)) (.f64 Om Om))
(/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) Om)
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (+.f64 l l) Om) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 (*.f64 l l) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64)))
(+.f64 (.f64 (/.f64 (+.f64 l l) Om) (/.f64 l Om)) (.f64 (/.f64 (+.f64 l l) Om) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) (/.f64 (+.f64 l l) Om)) (.f64 (/.f64 l Om) (/.f64 (+.f64 l l) Om)))
(+.f64 (+.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 #s(literal 2 binary64) (.f64 (/.f64 l (.f64 Om Om)) l))) (.f64 (/.f64 l (*.f64 Om Om)) l))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 ky #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) ky)
(/.f64 (-.f64 (.f64 ky ky) (.f64 (neg.f64 ky) (neg.f64 ky))) (+.f64 ky (neg.f64 ky)))
(/.f64 (-.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 ky) #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (+.f64 (.f64 (neg.f64 ky) (neg.f64 ky)) (*.f64 ky (neg.f64 ky)))))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 ky ky))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 ky #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (-.f64 (.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(-.f64 ky (neg.f64 ky))
(+.f64 ky (neg.f64 (neg.f64 ky)))
(+.f64 ky ky)
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 ky ky)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 ky ky))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 (neg.f64 (neg.f64 ky)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 ky ky)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (PI.f64)) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) ky) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 ky ky) (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 ky ky))))
(+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(.f64 (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 0 binary64)))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64))
(pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(/.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(neg.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(neg.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 kx #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) kx)
(/.f64 (-.f64 (.f64 kx kx) (.f64 (neg.f64 kx) (neg.f64 kx))) (+.f64 kx (neg.f64 kx)))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 kx) #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (+.f64 (.f64 (neg.f64 kx) (neg.f64 kx)) (*.f64 kx (neg.f64 kx)))))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (-.f64 (.f64 kx kx) (*.f64 kx kx))))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(-.f64 kx (neg.f64 kx))
(+.f64 (.f64 kx #s(literal 1 binary64)) (.f64 kx #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) kx) (.f64 #s(literal 1 binary64) kx))
(+.f64 kx (neg.f64 (neg.f64 kx)))
(+.f64 kx kx)
(*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (cos.f64 (-.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(neg.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (fabs.f64 (+.f64 kx kx))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 kx kx)))
(-.f64 (.f64 (cos.f64 (.f64 kx #s(literal 1 binary64))) (cos.f64 (.f64 kx #s(literal 1 binary64)))) (.f64 (sin.f64 (.f64 kx #s(literal 1 binary64))) (sin.f64 (.f64 kx #s(literal 1 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1 binary64) kx)) (cos.f64 (.f64 #s(literal 1 binary64) kx))) (.f64 (sin.f64 (.f64 #s(literal 1 binary64) kx)) (sin.f64 (.f64 #s(literal 1 binary64) kx))))
(-.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (neg.f64 (fabs.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (fabs.f64 (neg.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (fabs.f64 (fabs.f64 (fabs.f64 (+.f64 kx kx)))))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (fabs.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) kx)) #s(literal 0 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 kx kx))) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) #s(literal 0 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(+.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) (.f64 #s(literal 0 binary64) (sin.f64 (+.f64 kx kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 kx))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(pow.f64 (fabs.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 kx)) #s(literal 2 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 kx) #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(pow.f64 (fabs.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (sin.f64 ky)) #s(literal 2 binary64))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal -1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 ky) #s(literal -2 binary64)))
(neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64)))
(neg.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))))
(.f64 (sqrt.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal -1/2 binary64)))
(sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(fabs.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(fabs.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (pow.f64 (.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 0 binary64)))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(pow.f64 (.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64))
(pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(/.f64 (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(neg.f64 (.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))))
(neg.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (neg.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (/.f64 l Om))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))
(.f64 (/.f64 (+.f64 l l) Om) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (+.f64 l l) (/.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) Om))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(/.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))))
(+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 l Om)) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 l Om) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) #s(literal 2 binary64)) (/.f64 l Om))
(.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 (+.f64 l l) Om))
(.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))
(.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 l l) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) Om))
(.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 l Om) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(/.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) Om)
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (+.f64 l l)) (.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (neg.f64 Om))
(/.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))) (.f64 (/.f64 l Om) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 Om (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) Om)
(/.f64 (-.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))) (+.f64 #s(literal 1 binary64) (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(literal 1 binary64) (neg.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))))
(neg.f64 (-.f64 (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64)))
(-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))
(+.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (pow.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(sqrt.f64 (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (sqrt.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))) (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 #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)))))
(fabs.f64 (sqrt.f64 #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))))
(exp.f64 (.f64 (log.f64 #s(approx ( (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (/.f64 l (*.f64 Om Om)) l)) #s(literal 4 binary64))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 4 binary64) (/.f64 l Om))) (/.f64 l Om))
(.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (/.f64 #s(literal 1 binary64) Om)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) Om))
(.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 #s(literal 4 binary64) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(.f64 #s(literal 4 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (/.f64 l (*.f64 Om Om)) l)))
(/.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) Om)
(/.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 l l) #s(literal 4 binary64))) (.f64 Om Om))
(/.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (/.f64 #s(literal 1 binary64) Om))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (neg.f64 Om))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (neg.f64 Om))
(/.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om)
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(neg.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal -1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(+.f64 (/.f64 Om Om) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (pow.f64 (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(sqrt.f64 (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (/.f64 l Om)) (.f64 #s(literal 4 binary64) l))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) l) (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 4 binary64) (/.f64 l Om))) l)
(.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) (.f64 l #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (/.f64 l Om) (.f64 (.f64 #s(literal 4 binary64) l) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 l (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 4 binary64) (/.f64 l Om))))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) #s(literal 4 binary64)) (.f64 (/.f64 l (*.f64 Om Om)) l))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (/.f64 l (*.f64 Om Om)) l)) #s(literal 4 binary64))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 #s(literal 4 binary64) (/.f64 l Om))) (/.f64 l Om))
(.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (/.f64 #s(literal 1 binary64) Om)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) Om))
(.f64 (.f64 (/.f64 l (.f64 Om Om)) l) (.f64 #s(literal 4 binary64) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))))
(.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(.f64 #s(literal 4 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (/.f64 l (*.f64 Om Om)) l)))
(/.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) Om)
(/.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 l l) #s(literal 4 binary64))) (.f64 Om Om))
(/.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (neg.f64 (neg.f64 Om)))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(neg.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (/.f64 #s(literal 1 binary64) Om))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 Om)) (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))) (neg.f64 Om))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (neg.f64 Om))
(/.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om)
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (.f64 #s(literal 1 binary64) (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(neg.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))) #s(literal 1 binary64)))
(neg.f64 (-.f64 #s(literal -1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (neg.f64 (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om))))))
(+.f64 (/.f64 Om Om) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))))
(.f64 (pow.f64 (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(pow.f64 (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(sqrt.f64 (pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (+.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l (.f64 Om Om)))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))

eval136.0ms (3.3%)

Memory: 7.7MiB live, 122.5MiB allocated; 16ms collecting garbage
Compiler: Compiled 93 456 to 9 832 computations (89.5% saved)

prune17.0ms (0.4%)

Memory

-5.1MiB live, 26.9MiB allocated; 1ms collecting garbage

Pruning

9 alts after pruning (6 fresh and 3 done)

	Pruned	Kept	Total
New	1 373	5	1 378
Fresh	1	1	2
Picked	3	2	5
Done	0	1	1
Total	1 377	9	1 386

Accuracy

100.0%

Counts

1 386 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	55.2%	(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
	91.2%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om))) #s(literal -1/2 binary64)))
▶	70.1%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om))) #s(literal -1/2 binary64)))
▶	62.7%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 Om Om)) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
▶	92.2%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (+.f64 l l) Om) (.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))))))))))))))
▶	75.9%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (+.f64 l l) Om) (.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (pow.f64 ky #s(literal 2 binary64))))))))))))
▶	92.6%	(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 l l) Om) (.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))))))))))
✓	63.2%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))
✓	55.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))

Compiler

Compiled 367 to 174 computations (52.6% saved)

series184.0ms (4.5%)

Memory

9.1MiB live, 127.2MiB allocated; 9ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2582	47932

Stop Event

1×	iter-limit

Counts

79 → 462

Calls

Call 1

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

Outputs
#s(approx 1 #s(literal 0 binary64))
#s(approx l l)
#s(approx (/ l Om) (/.f64 l Om))
#s(approx (+ l l) (*.f64 #s(literal 2 binary64) l))
#s(approx (* l l) (pow.f64 l #s(literal 2 binary64)))
#s(approx (/ (+ l l) Om) (*.f64 #s(literal 2 binary64) (/.f64 l Om)))
#s(approx (* 4 (/ l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))
#s(approx (* (* l l) 4) (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 2 binary64))))
#s(approx (* (* 4 (/ l Om)) l) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) Om)))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) #s(literal 1 binary64))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 2 binary64))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) #s(literal 1/2 binary64))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 2 binary64) kx)) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) Om)) (/.f64 Om (pow.f64 l #s(literal 2 binary64))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (-.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (-.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 5 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) (/.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (-.f64 (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 (pow.f64 l #s(literal 3 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 #s(literal 4 binary64) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (.f64 #s(literal -1 binary64) (.f64 l (-.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64))))))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal -1/2 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l)))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l)))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))))) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))) (.f64 #s(literal 5/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 7 binary64))))))) l)))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64)))))) l))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 #s(literal 3/16 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) l))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 l (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 l (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))) #s(literal 2 binary64)))))) l)) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))) (pow.f64 Om #s(literal 2 binary64))))))))) l))))
#s(approx (* Om Om) (pow.f64 Om #s(literal 2 binary64)))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) Om))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) Om))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))) Om))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))) Om))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (/.f64 (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (/.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) Om))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))) Om))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) Om))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (/.f64 (+.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))) Om))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -5/32 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 7 binary64)))) (.f64 #s(literal 3/16 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 Om (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 Om (+.f64 (.f64 (pow.f64 Om #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 3/16 binary64) (/.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 binary64) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 Om (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 Om (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 Om (+.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 Om (-.f64 (.f64 #s(literal 1/64 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 3 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/32 binary64) (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (.f64 Om (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (*.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64))))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 #s(literal 1 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 #s(literal 1 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 #s(literal -1 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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))) (.f64 #s(literal 8 binary64) (.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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 (pow.f64 l #s(literal 2 binary64)) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.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) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))))) (pow.f64 Om #s(literal 6 binary64))))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (.f64 #s(literal -1 binary64) (.f64 Om (-.f64 (.f64 #s(literal -4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) #s(literal 1 binary64)))))
#s(approx kx kx)
#s(approx (+ kx kx) (*.f64 #s(literal 2 binary64) kx))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 kx #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ kx kx)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (- 1 (cos (+ kx kx))) (*.f64 #s(literal 2 binary64) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 4/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 2/3 binary64))))))
#s(approx (- 1 (cos (+ kx kx))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 4/45 binary64) (.f64 #s(literal -2/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 2/3 binary64))))))
#s(approx (* 1/2 (- 1 (cos (+ kx kx)))) (pow.f64 kx #s(literal 2 binary64)))
#s(approx (* 1/2 (- 1 (cos (+ kx kx)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))))
#s(approx (* 1/2 (- 1 (cos (+ kx kx)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (* 1/2 (- 1 (cos (+ kx kx)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 kx #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) l) Om))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) l) Om)) (.f64 #s(literal 2 binary64) (/.f64 l Om))))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 l Om)) (.f64 #s(literal 4/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) l) Om))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 kx #s(literal 2 binary64))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 kx #s(literal 2 binary64)))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (+.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 kx #s(literal 2 binary64))) #s(literal 1/3 binary64)))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 4 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 2 binary64)))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (+.f64 (.f64 #s(literal 2 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (pow.f64 l #s(literal 2 binary64))) (.f64 #s(literal 8/45 binary64) (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)))))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #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 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om)))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (+.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (+.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (+.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (+.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) 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 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 kx #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 kx #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) 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 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) 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 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))) Om))) Om)) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))) Om))) Om))))))))))))))
#s(approx (cos (+ kx kx)) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))
#s(approx (* 1/2 (- 1 (cos (+ kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #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 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))
#s(approx (cos (+ kx kx)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx))))
#s(approx (- 1 (cos (+ kx kx))) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))
#s(approx (* 1/2 (- 1 (cos (+ kx kx)))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om)))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx))))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om))) Om))
#s(approx (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om))) Om)))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) kx)))))) Om))) Om))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) Om))) Om))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) kx)))))) Om))) Om)))))))
#s(approx ky ky)
#s(approx (pow ky 2) (pow.f64 ky #s(literal 2 binary64)))
#s(approx (+ ky ky) (*.f64 #s(literal 2 binary64) ky))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 2 binary64)))))
#s(approx (cos (+ ky ky)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/3 binary64) (*.f64 #s(literal -4/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* -2 ky) (*.f64 #s(literal -2 binary64) ky))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 ky #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/3 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (cos (+ ky ky))) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal -2/45 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1 binary64)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 2/45 binary64) (.f64 #s(literal -1/315 binary64) (pow.f64 ky #s(literal 2 binary64))))) #s(literal 1/3 binary64))))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64))))) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))))
#s(approx (+ (* -2 ky) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* -2 ky) (* (PI) 1/2)) (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* -2 ky) (* (PI) 1/2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* -2 ky) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -2 binary64) (.f64 ky (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (* -2 ky) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 ky (+.f64 (.f64 #s(literal -2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -2 binary64) (.f64 ky (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (* -2 ky) (* (PI) 1/2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 ky (+.f64 (.f64 #s(literal -2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 ky (+.f64 (.f64 #s(literal -2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 4/3 binary64) (.f64 ky (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) l) Om))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) l) Om)) (.f64 #s(literal 2 binary64) (/.f64 l Om))))))
#s(approx (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 l (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 l Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2/3 binary64) (/.f64 l Om)) (.f64 #s(literal 4/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) l) Om))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l 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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (pow.f64 ky #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/3 binary64) (pow.f64 ky #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 2/45 binary64) (pow.f64 ky #s(literal 2 binary64))) #s(literal 1/3 binary64)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om))))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om))))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 2 binary64)))))))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #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 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (pow.f64 l #s(literal 2 binary64))) (.f64 #s(literal 8/45 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))))))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)))))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) Om)) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) Om)))))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))))))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 8/45 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))
#s(approx (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (* 1/2 (+ 1 (/ 1 (sqrt (+ 1 (* (/ (+ l l) Om) (* (/ (+ l l) Om) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))) (+.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2)))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 ky (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2)))) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1 binary64) (.f64 ky (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2)))) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 ky (+.f64 (.f64 #s(literal -1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 2/3 binary64) (.f64 ky (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 ky (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 ky (-.f64 (.f64 ky (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 ky (-.f64 (.f64 ky (-.f64 (.f64 #s(literal -2/3 binary64) (.f64 ky (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 #s(literal -1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #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 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (+.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (+.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (+.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (+.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))))) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))))) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))))))))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))))) (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (pow.f64 l #s(literal 2 binary64))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) 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 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 6 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 ky #s(literal 2 binary64)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 ky #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 8/45 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) 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 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 6 binary64)))))))) (.f64 (pow.f64 Om #s(literal 2 binary64)) (.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 3 binary64)))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -4/3 binary64) (/.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 Om #s(literal 2 binary64)))) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 2 binary64)))))) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) 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 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)) #s(literal 6 binary64))))))) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))))))))))
#s(approx (cos (+ ky ky)) (cos.f64 (*.f64 #s(literal 2 binary64) ky)))
#s(approx (* 1/2 (cos (+ ky ky))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky)))))
#s(approx (+ (* -2 ky) (* (PI) 1/2)) (.f64 ky (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) ky)) #s(literal 2 binary64))))
#s(approx (sin (+ (* -2 ky) (* (PI) 1/2))) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 #s(literal 2 binary64) ky))))
#s(approx (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 2 binary64) ky)))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (*.f64 #s(literal 2 binary64) ky))))))
#s(approx (cos (+ ky ky)) (cos.f64 (neg.f64 (*.f64 #s(literal -2 binary64) ky))))
#s(approx (* 1/2 (cos (+ ky ky))) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky))))))
#s(approx (+ (* -2 ky) (* (PI) 1/2)) (.f64 #s(literal -1 binary64) (.f64 ky (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) ky))))))
#s(approx (sin (+ (* -2 ky) (* (PI) 1/2))) (sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))
#s(approx (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om)))
#s(approx (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (.f64 #s(literal 4 binary64) (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx)))))))
#s(approx (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))
#s(approx (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))))
#s(approx (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om) (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))
#s(approx (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2)))) (.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- 1/2 (* 1/2 (sin (+ (* -2 ky) (* (PI) 1/2))))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (.f64 #s(literal -2 binary64) ky) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))
#s(approx (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))
#s(approx (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))
#s(approx (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64))))))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (- (/ (* (* (* l l) 4) (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2))) (* Om Om)) -1))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) (pow.f64 Om #s(literal 2 binary64)))))))))))
#s(approx (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om)) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om)))
#s(approx (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) kx))))) Om))) Om))))
#s(approx (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om))))))
#s(approx (sqrt (- (/ 1/2 (sqrt (/ (+ (* (- (* 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (* (* 4 (/ l Om)) l)) Om) Om))) -1/2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 Om (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 l #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (neg.f64 (.f64 #s(literal -2 binary64) ky)))))) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) kx))))) Om))) Om)))))))

Calls

12 calls:

Time	Variable	Point
9.0ms	kx	0
6.0ms	ky	inf
6.0ms	l	0
5.0ms	kx	inf
5.0ms	Om	0

rewrite174.0ms (4.3%)

Memory

-1.3MiB live, 86.7MiB allocated; 12ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	95	1657
0	163	1609
1	770	1203
2	3346	1203
0	4003	1203

Stop Event

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

Counts

79 → 992

Calls

Call 1

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

Outputs
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 1/2 binary64)
l
Om
kx
ky
(*.f64 (/.f64 #s(literal 1 binary64) Om) l)
(*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(*.f64 l (/.f64 #s(literal 1 binary64) Om))
(/.f64 (*.f64 l #s(literal 1 binary64)) Om)
(/.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 Om)))
(/.f64 (neg.f64 l) (neg.f64 Om))
(/.f64 l Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (neg.f64 l)))
(/.f64 #s(literal 1 binary64) (/.f64 Om l))
(neg.f64 (/.f64 l (neg.f64 Om)))
(neg.f64 (/.f64 (neg.f64 l) Om))
#s(literal 4 binary64)
#s(literal -2 binary64)
#s(literal -1 binary64)
#s(literal -1/2 binary64)
#s(literal 1/2 binary64)
(*.f64 (pow.f64 ky #s(literal 1 binary64)) (pow.f64 ky #s(literal 1 binary64)))
(*.f64 (pow.f64 ky #s(literal 1 binary64)) ky)
(*.f64 (fabs.f64 ky) (fabs.f64 ky))
(*.f64 (neg.f64 ky) (neg.f64 ky))
(*.f64 (pow.f64 ky (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 ky (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 ky ky)
(pow.f64 ky #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 ky) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 l) l)) l)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 l l)) l)
(*.f64 l #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
(/.f64 (-.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 (neg.f64 l) #s(literal 3 binary64))) (+.f64 (.f64 l l) (+.f64 (.f64 l l) (*.f64 l (neg.f64 l)))))
(/.f64 (-.f64 (.f64 l l) (.f64 l l)) (+.f64 l (neg.f64 l)))
(/.f64 (-.f64 (.f64 l l) (.f64 l l)) (-.f64 l l))
(/.f64 (+.f64 (pow.f64 l #s(literal 3 binary64)) (pow.f64 l #s(literal 3 binary64))) (+.f64 (.f64 l l) (-.f64 (.f64 l l) (*.f64 l l))))
(neg.f64 (*.f64 #s(literal -2 binary64) l))
(-.f64 l (neg.f64 l))
(+.f64 l (neg.f64 (neg.f64 l)))
(+.f64 l l)
(*.f64 (pow.f64 l (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 l (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 l)) (fabs.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (fabs.f64 l)) (neg.f64 (fabs.f64 l)))
(*.f64 (neg.f64 (neg.f64 l)) (neg.f64 (neg.f64 l)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) (pow.f64 l #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 1 binary64)) l)
(*.f64 (fabs.f64 l) (fabs.f64 l))
(*.f64 (neg.f64 l) (neg.f64 l))
(*.f64 l l)
(pow.f64 (fabs.f64 l) #s(literal 2 binary64))
(pow.f64 (neg.f64 l) #s(literal 2 binary64))
(pow.f64 l #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 l) l))
(neg.f64 (*.f64 l (neg.f64 l)))
(fabs.f64 (*.f64 l l))
(exp.f64 (*.f64 (log.f64 l) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 l Om) (/.f64 l Om))) (/.f64 l Om))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 l l))
(.f64 (.f64 #s(literal -2 binary64) l) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(*.f64 (+.f64 l l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 l (+.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 #s(literal 1 binary64) Om)))
(*.f64 #s(literal 2 binary64) (/.f64 l Om))
(/.f64 (*.f64 (+.f64 l l) #s(literal 1 binary64)) Om)
(/.f64 (+.f64 (*.f64 (/.f64 l Om) (neg.f64 Om)) (neg.f64 l)) (neg.f64 Om))
(/.f64 (+.f64 (*.f64 (/.f64 l Om) Om) l) Om)
(/.f64 (+.f64 (.f64 (neg.f64 l) (neg.f64 Om)) (.f64 (neg.f64 l) (neg.f64 Om))) (*.f64 Om Om))
(/.f64 (+.f64 (.f64 (neg.f64 l) Om) (.f64 l (neg.f64 Om))) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l (neg.f64 Om)) (.f64 (neg.f64 l) Om)) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l Om) (.f64 l Om)) (*.f64 Om Om))
(/.f64 (-.f64 (.f64 (/.f64 l Om) (/.f64 l Om)) (.f64 (/.f64 l Om) (/.f64 l Om))) (-.f64 (/.f64 l Om) (/.f64 l Om)))
(/.f64 (+.f64 (pow.f64 (/.f64 l Om) #s(literal 3 binary64)) (pow.f64 (/.f64 l Om) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 l Om) (/.f64 l Om)) (-.f64 (.f64 (/.f64 l Om) (/.f64 l Om)) (*.f64 (/.f64 l Om) (/.f64 l Om)))))
(/.f64 (+.f64 (.f64 (neg.f64 l) (neg.f64 Om)) (.f64 (neg.f64 Om) (neg.f64 l))) (*.f64 Om Om))
(/.f64 (+.f64 (.f64 (neg.f64 l) Om) (.f64 (neg.f64 Om) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l (neg.f64 Om)) (.f64 Om (neg.f64 l))) (*.f64 (neg.f64 Om) Om))
(/.f64 (+.f64 (.f64 l Om) (.f64 Om l)) (*.f64 Om Om))
(/.f64 (*.f64 #s(literal -2 binary64) l) (neg.f64 Om))
(/.f64 (+.f64 l l) (neg.f64 (neg.f64 Om)))
(/.f64 (+.f64 l l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (*.f64 #s(literal -2 binary64) l)))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 l l)))
(neg.f64 (/.f64 (*.f64 #s(literal -2 binary64) l) Om))
(-.f64 (/.f64 l Om) (*.f64 (neg.f64 l) (/.f64 #s(literal 1 binary64) Om)))
(-.f64 (/.f64 l Om) (neg.f64 (/.f64 l Om)))
(-.f64 (/.f64 l Om) (/.f64 (neg.f64 l) Om))
(+.f64 (/.f64 l Om) (/.f64 l Om))
(*.f64 (pow.f64 Om (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 Om (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (fabs.f64 (fabs.f64 Om)) (fabs.f64 (fabs.f64 Om)))
(*.f64 (neg.f64 (fabs.f64 Om)) (neg.f64 (fabs.f64 Om)))
(*.f64 (neg.f64 (neg.f64 Om)) (neg.f64 (neg.f64 Om)))
(*.f64 (pow.f64 Om #s(literal 1 binary64)) (pow.f64 Om #s(literal 1 binary64)))
(*.f64 (pow.f64 Om #s(literal 1 binary64)) Om)
(*.f64 (fabs.f64 Om) (fabs.f64 Om))
(*.f64 (neg.f64 Om) (neg.f64 Om))
(*.f64 Om Om)
(pow.f64 (fabs.f64 Om) #s(literal 2 binary64))
(pow.f64 (neg.f64 Om) #s(literal 2 binary64))
(pow.f64 Om #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 Om) Om))
(fabs.f64 (*.f64 Om Om))
(exp.f64 (*.f64 (log.f64 Om) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(.f64 l (.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 4 binary64)))
(/.f64 (*.f64 #s(literal 4 binary64) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (neg.f64 l) #s(literal 4 binary64)) (neg.f64 Om))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 4 binary64) l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 #s(literal 4 binary64) l)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 kx) kx)) kx)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 kx kx)) kx)
(*.f64 kx #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) kx)
(/.f64 (-.f64 (.f64 kx kx) (.f64 (neg.f64 kx) (neg.f64 kx))) (+.f64 kx (neg.f64 kx)))
(/.f64 (-.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 (neg.f64 kx) #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (+.f64 (.f64 (neg.f64 kx) (neg.f64 kx)) (*.f64 kx (neg.f64 kx)))))
(/.f64 (-.f64 (.f64 kx kx) (.f64 kx kx)) (-.f64 kx kx))
(/.f64 (+.f64 (pow.f64 kx #s(literal 3 binary64)) (pow.f64 kx #s(literal 3 binary64))) (+.f64 (.f64 kx kx) (-.f64 (.f64 kx kx) (*.f64 kx kx))))
(neg.f64 (*.f64 #s(literal -2 binary64) kx))
(-.f64 kx (neg.f64 kx))
(+.f64 kx (neg.f64 (neg.f64 kx)))
(+.f64 kx kx)
(*.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 kx kx)))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 kx kx))))
(sin.f64 (+.f64 (.f64 #s(literal -2 binary64) kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 kx kx)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (+.f64 kx kx) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(-.f64 (.f64 (cos.f64 kx) (cos.f64 (neg.f64 (neg.f64 kx)))) (.f64 (sin.f64 kx) (sin.f64 (neg.f64 (neg.f64 kx)))))
(-.f64 (.f64 (sin.f64 kx) (cos.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 kx) (sin.f64 (-.f64 (neg.f64 kx) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (+.f64 kx kx)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 kx kx))))
(cos.f64 (*.f64 #s(literal -2 binary64) kx))
(cos.f64 (fabs.f64 (+.f64 kx kx)))
(cos.f64 (+.f64 kx kx))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) kx)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 kx kx))) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 kx kx))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (+.f64 kx kx))))
(+.f64 (.f64 (sin.f64 kx) (cos.f64 (+.f64 kx (.f64 (PI.f64) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (.f64 (sin.f64 (+.f64 kx kx)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (+.f64 kx kx)) (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (neg.f64 kx)) (sin.f64 kx)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 (sin.f64 kx) (sin.f64 (neg.f64 kx))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (neg.f64 (cos.f64 (+.f64 kx kx))))) (-.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) (neg.f64 (cos.f64 (+.f64 kx kx)))) (*.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))) (*.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))))
(neg.f64 (+.f64 #s(literal -1 binary64) (cos.f64 (+.f64 kx kx))))
(neg.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))
(+.f64 (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))))
(*.f64 (sin.f64 (fabs.f64 kx)) (sin.f64 (fabs.f64 kx)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 kx)) (fabs.f64 (sin.f64 kx)))
(*.f64 (neg.f64 (sin.f64 kx)) (neg.f64 (sin.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (pow.f64 (sin.f64 kx) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 kx) #s(literal 1 binary64)) (sin.f64 kx))
(*.f64 (sin.f64 (neg.f64 kx)) (sin.f64 (neg.f64 kx)))
(*.f64 (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 kx) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 kx kx)) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 ky) ky)) ky)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 ky ky)) ky)
(*.f64 ky #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) ky)
(/.f64 (-.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 (neg.f64 ky) #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (+.f64 (.f64 ky ky) (*.f64 ky (neg.f64 ky)))))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (+.f64 ky (neg.f64 ky)))
(/.f64 (-.f64 (.f64 ky ky) (.f64 ky ky)) (-.f64 ky ky))
(/.f64 (+.f64 (pow.f64 ky #s(literal 3 binary64)) (pow.f64 ky #s(literal 3 binary64))) (+.f64 (.f64 ky ky) (-.f64 (.f64 ky ky) (*.f64 ky ky))))
(neg.f64 (*.f64 #s(literal -2 binary64) ky))
(-.f64 ky (neg.f64 ky))
(+.f64 ky (neg.f64 (neg.f64 ky)))
(+.f64 ky ky)
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal -2 binary64) ky))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))) (sin.f64 (-.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 ky ky)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky)))) (-.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (+.f64 ky ky) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (cos.f64 ky) (cos.f64 (neg.f64 (neg.f64 ky)))) (.f64 (sin.f64 ky) (sin.f64 (neg.f64 (neg.f64 ky)))))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (.f64 (neg.f64 ky) #s(literal -2 binary64)))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 (neg.f64 ky) #s(literal -2 binary64)))))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (+.f64 ky ky))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (neg.f64 (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 ky) (cos.f64 (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) (cos.f64 (.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal -2 binary64) ky))))
(+.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (neg.f64 ky)) (sin.f64 ky)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 (neg.f64 ky))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(*.f64 #s(literal -2 binary64) ky)
(*.f64 ky #s(literal -2 binary64))
(*.f64 #s(literal 2 binary64) (neg.f64 ky))
(neg.f64 (+.f64 ky ky))
(-.f64 (neg.f64 ky) ky)
(+.f64 (neg.f64 ky) (neg.f64 ky))
(.f64 (.f64 #s(literal 4 binary64) (fabs.f64 l)) (fabs.f64 l))
(.f64 (.f64 #s(literal 4 binary64) (neg.f64 l)) (neg.f64 l))
(.f64 (.f64 #s(literal 4 binary64) l) l)
(.f64 (fabs.f64 l) (.f64 (fabs.f64 l) #s(literal 4 binary64)))
(.f64 (neg.f64 l) (.f64 (neg.f64 l) #s(literal 4 binary64)))
(.f64 (.f64 l l) #s(literal 4 binary64))
(.f64 #s(literal 4 binary64) (.f64 l l))
(.f64 l (.f64 #s(literal 4 binary64) l))
(.f64 (.f64 (/.f64 l Om) l) #s(literal 4 binary64))
(.f64 (.f64 #s(literal 4 binary64) l) (/.f64 l Om))
(.f64 (.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(.f64 (.f64 l l) (/.f64 #s(literal 4 binary64) Om))
(.f64 #s(literal 4 binary64) (.f64 (/.f64 l Om) l))
(.f64 (/.f64 l Om) (.f64 #s(literal 4 binary64) l))
(.f64 l (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(/.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) (neg.f64 Om))
(/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 l l) #s(literal 4 binary64))))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (sin.f64 (neg.f64 ky)) (sin.f64 (neg.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64)))
(neg.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(PI.f64)
(.f64 (.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(.f64 #s(literal 1 binary64) (.f64 (PI.f64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(neg.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (.f64 (PI.f64) #s(literal 1/2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) ky))) (.f64 #s(literal -2 binary64) ky))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 #s(literal -2 binary64) ky))) (.f64 #s(literal -2 binary64) ky))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal -2 binary64) ky))) (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 #s(literal -2 binary64) ky)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal -2 binary64) ky)) (.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (.f64 (PI.f64) #s(literal -1/2 binary64)))) (+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) ky) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal -2 binary64) ky)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (*.f64 #s(literal -2 binary64) ky)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -2 binary64) ky) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal -2 binary64) ky)) (+.f64 (.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (.f64 (PI.f64) #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal -2 binary64) ky) (*.f64 (PI.f64) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal -2 binary64) ky)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64)))) (-.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -2 binary64) ky) #s(literal 3 binary64)) (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) ky) (.f64 #s(literal -2 binary64) ky)) (-.f64 (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (PI.f64) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -2 binary64) ky) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(neg.f64 (-.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)) (.f64 #s(literal -2 binary64) ky)))
(-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 (neg.f64 ky) #s(literal -2 binary64)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))
(-.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal -1/2 binary64)))
(+.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (.f64 #s(literal -2 binary64) ky))
(+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (cos.f64 ky) (sin.f64 ky)) (-.f64 (cos.f64 ky) (sin.f64 ky)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal -2 binary64) ky))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky)))) (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))) (sin.f64 (-.f64 (.f64 #s(literal -2 binary64) ky) (.f64 (PI.f64) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (cos.f64 (-.f64 ky ky)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky)))) (-.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(neg.f64 (neg.f64 (cos.f64 (+.f64 ky ky))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 ky ky)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (-.f64 (+.f64 ky ky) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky)))
(-.f64 (.f64 (cos.f64 ky) (cos.f64 (neg.f64 (neg.f64 ky)))) (.f64 (sin.f64 ky) (sin.f64 (neg.f64 (neg.f64 ky)))))
(-.f64 (.f64 (sin.f64 ky) (cos.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))) (.f64 (cos.f64 ky) (sin.f64 (-.f64 (neg.f64 ky) (.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (.f64 (neg.f64 ky) #s(literal -2 binary64)))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 (neg.f64 ky) #s(literal -2 binary64)))))
(-.f64 (.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (+.f64 ky ky))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (neg.f64 (cos.f64 (+.f64 ky ky))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (neg.f64 (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))))
(-.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 ky ky))))
(cos.f64 (fabs.f64 (+.f64 ky ky)))
(cos.f64 (*.f64 #s(literal -2 binary64) ky))
(cos.f64 (+.f64 ky ky))
(+.f64 (.f64 (sin.f64 (fabs.f64 (+.f64 ky ky))) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 ky) (cos.f64 (+.f64 ky (.f64 (PI.f64) #s(literal 1/2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal -2 binary64) ky)) (cos.f64 (.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))) (.f64 (cos.f64 (+.f64 ky ky)) (sin.f64 (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (sin.f64 (+.f64 ky ky)) (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64)))) (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (+.f64 ky ky))))
(+.f64 (.f64 (sin.f64 (.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (*.f64 #s(literal -2 binary64) ky))))
(+.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (neg.f64 ky)) (sin.f64 ky)))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 (sin.f64 ky) (sin.f64 (neg.f64 ky))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))
(.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (+.f64 l l) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 l Om)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 l Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 (+.f64 l l) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)))
(.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 l l) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) Om)
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (+.f64 l l)) (.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (neg.f64 Om))
(/.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))) (.f64 (/.f64 l Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) Om) (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) Om)
(/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(neg.f64 (-.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
#s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) l) (.f64 #s(literal 4 binary64) (/.f64 l Om)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 l Om))) l)
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 (/.f64 l Om) l))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) Om))
(.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) (.f64 l #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(.f64 (.f64 l l) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) Om))
(.f64 #s(literal 4 binary64) (.f64 (.f64 (/.f64 l Om) l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(.f64 l (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 l Om))))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64)))))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 l l)) #s(literal 4 binary64))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) l) (.f64 #s(literal 4 binary64) l))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (.f64 l l))
(.f64 (fabs.f64 l) (.f64 (fabs.f64 l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(.f64 (neg.f64 l) (.f64 (neg.f64 l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64)))
(.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))
(.f64 (.f64 l l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)))
(.f64 #s(literal 4 binary64) (.f64 (.f64 l l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(.f64 l (.f64 (.f64 #s(literal 4 binary64) l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(.f64 l (.f64 l (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64))))
(.f64 (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (fabs.f64 Om)) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om)))
(.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (fabs.f64 Om)) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (fabs.f64 Om)))
(.f64 (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (neg.f64 Om)) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om)))
(.f64 (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (neg.f64 Om)) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (neg.f64 Om)))
(.f64 (/.f64 (.f64 l l) (fabs.f64 Om)) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (fabs.f64 Om)))
(.f64 (/.f64 (.f64 l l) (neg.f64 Om)) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (neg.f64 Om)))
(.f64 (.f64 (/.f64 l Om) l) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) Om))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 l Om))) (/.f64 l Om))
(.f64 (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 Om Om)) (.f64 (*.f64 l l) #s(literal 4 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 Om Om)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))))
(.f64 (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) Om) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(.f64 (.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 (neg.f64 Om) Om)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 Om Om)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om Om))))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))
(.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) Om))
(.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (*.f64 Om Om)))
(.f64 (.f64 l l) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (.f64 Om Om))))
(.f64 (.f64 l l) (.f64 #s(literal 4 binary64) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (*.f64 Om Om))))
(.f64 (.f64 l l) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) #s(literal 4 binary64)) (*.f64 Om Om)))
(.f64 #s(literal 4 binary64) (.f64 (.f64 l l) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (*.f64 Om Om))))
(.f64 l (.f64 (.f64 #s(literal 4 binary64) l) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (*.f64 Om Om))))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) #s(literal 1 binary64)) (.f64 Om Om))
(/.f64 (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) (fabs.f64 Om)) (fabs.f64 Om))
(/.f64 (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) (neg.f64 Om)) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))) (*.f64 Om Om))
(/.f64 (.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 Om Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 Om) Om) (.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 Om Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 l l) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(neg.f64 (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 l l) #s(literal 4 binary64))) (*.f64 (neg.f64 Om) Om)))
(neg.f64 (/.f64 (.f64 (neg.f64 (.f64 (.f64 l l) #s(literal 4 binary64))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (*.f64 Om Om)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)) Om)
(/.f64 (-.f64 (.f64 Om Om) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))) (-.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (.f64 Om Om)) (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 Om)))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (.f64 Om Om)) (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))
(/.f64 (+.f64 (pow.f64 Om #s(literal 3 binary64)) (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 3 binary64))) (+.f64 (.f64 Om Om) (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 3 binary64)) (pow.f64 (neg.f64 Om) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (+.f64 (.f64 Om Om) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 Om)))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (-.f64 (.f64 Om Om) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))))
(neg.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 Om))
(-.f64 Om (.f64 (neg.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 #s(literal 4 binary64) (/.f64 l Om)))) l))
(-.f64 Om (.f64 (neg.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(-.f64 Om (.f64 (neg.f64 (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))))
(-.f64 Om (neg.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (neg.f64 (neg.f64 Om)))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)
(+.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (/.f64 #s(literal 1 binary64) Om))
(/.f64 (.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1 binary64)) Om)
(/.f64 (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) Om) Om) Om)
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (.f64 Om Om)) (*.f64 Om Om))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (neg.f64 Om))
(/.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (neg.f64 (neg.f64 Om)))
(/.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(neg.f64 (/.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (neg.f64 Om)))
(neg.f64 (/.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) Om))
(neg.f64 (-.f64 #s(literal -1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (/.f64 (neg.f64 Om) Om))
(-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky)))))
(+.f64 (.f64 (.f64 (cos.f64 (.f64 (PI.f64) #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal -2 binary64) ky))) #s(literal 1/2 binary64)) (.f64 (.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 (fabs.f64 ky)) (sin.f64 (fabs.f64 ky)))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 (sin.f64 ky)) (fabs.f64 (sin.f64 ky)))
(*.f64 (neg.f64 (sin.f64 ky)) (neg.f64 (sin.f64 ky)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (pow.f64 (sin.f64 ky) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 ky) #s(literal 1 binary64)) (sin.f64 ky))
(*.f64 (sin.f64 (neg.f64 ky)) (sin.f64 (neg.f64 ky)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (sin.f64 ky) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))))
(.f64 #s(literal 1 binary64) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))))
(neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64)))
(neg.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
(neg.f64 (*.f64 (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky)))))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal -1/2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))
(.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (+.f64 l l) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (*.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 l Om)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 l Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))
(.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 (+.f64 l l) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)))
(.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 l l) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) Om)
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l)) (+.f64 l l)) (.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (+.f64 l l))) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (neg.f64 Om))
(/.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))) (.f64 (/.f64 l Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) Om) (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) Om)
(/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))))
(neg.f64 (-.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64))))))
(+.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (*.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (/.f64 #s(literal 1 binary64) (neg.f64 Om)))
(.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (/.f64 #s(literal 1 binary64) Om))
(/.f64 (.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1 binary64)) Om)
(/.f64 (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) Om) Om) Om)
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (.f64 Om Om)) (*.f64 Om Om))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om)))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(/.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (neg.f64 Om))
(/.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (neg.f64 (neg.f64 Om)))
(/.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)))
(neg.f64 (/.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) (neg.f64 Om)))
(neg.f64 (/.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) Om))
(neg.f64 (-.f64 #s(literal -1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (/.f64 (neg.f64 Om) Om))
(-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(.f64 (pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) Om)))
(pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))) (sqrt.f64 (neg.f64 Om)))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))))
(-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) Om) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) Om)))
(pow.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om))) (sqrt.f64 (neg.f64 Om)))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om)) (sqrt.f64 Om))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 #s(literal 1/2 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal -1/2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(neg.f64 (-.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64))))))
(-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) (.f64 Om Om))) #s(literal -1 binary64)))) #s(literal -1/2 binary64))) #s(literal 1/2 binary64)))
#s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (+.f64 l l)) (/.f64 #s(literal 1 binary64) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om))
(.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))))
(.f64 (+.f64 l l) (/.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) (neg.f64 Om))
(/.f64 (neg.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (+.f64 l l))) (neg.f64 Om))
(/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (+.f64 l l)) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (+.f64 l l))))
(+.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (/.f64 l Om)) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (/.f64 l Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))))
(.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))
(.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) (/.f64 #s(literal 1 binary64) Om))
(.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om)) (/.f64 (+.f64 l l) Om))
(.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (*.f64 Om Om)))
(.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om)))
(.f64 (+.f64 l l) (.f64 (/.f64 #s(literal 1 binary64) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 l l) (/.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om)) Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (/.f64 (+.f64 l l) Om)) (.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (+.f64 l l))) Om)
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om))) (neg.f64 Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (+.f64 l l)) (.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (+.f64 l l)) (+.f64 l l)) (.f64 Om Om))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (+.f64 l l))) (.f64 (neg.f64 Om) Om))
(/.f64 (.f64 (+.f64 l l) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (+.f64 l l))) (.f64 Om Om))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) (neg.f64 Om))
(/.f64 (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))))
(+.f64 (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)) (.f64 (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om)) (/.f64 l Om)))
(+.f64 (.f64 (/.f64 l Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))) (/.f64 (+.f64 l l) Om))) (.f64 (/.f64 l Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (/.f64 (+.f64 l l) Om))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) Om) (.f64 (.f64 (+.f64 l l) (/.f64 (+.f64 l l) Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))) Om)
(/.f64 (-.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))))) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky))))) (.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))))))
(neg.f64 (-.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64)))
(-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))))
(+.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (neg.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om))) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))))))
(+.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))
(pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(sqrt.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(fabs.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(pow.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))))) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64)) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64))) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))
(/.f64 (.f64 (-.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))))
(.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal -1 binary64))))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)) #s(literal -1/2 binary64)))
(sqrt.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64)))))
(fabs.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 l l) (+.f64 l l)) (.f64 Om Om)) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 (* 1/2 (cos (+ ky ky)))) (*.f64 ky ky)))) #s(literal -1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))

eval140.0ms (3.5%)

Memory: 2.9MiB live, 123.5MiB allocated; 18ms collecting garbage
Compiler: Compiled 71 983 to 10 100 computations (86.0% saved)

prune18.0ms (0.5%)

Memory

4.2MiB live, 28.5MiB allocated; 1ms collecting garbage

Pruning

9 alts after pruning (4 fresh and 5 done)

	Pruned	Kept	Total
New	1 331	3	1 334
Fresh	0	1	1
Picked	3	2	5
Done	0	3	3
Total	1 334	9	1 343

Accuracy

100.0%

Counts

1 343 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	55.2%	(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( (/ 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 (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))))
	91.2%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) (cos.f64 (+.f64 kx kx)))) #s(literal -1/2 binary64)) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om))) #s(literal -1/2 binary64)))
✓	70.1%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om))) #s(literal -1/2 binary64)))
	90.8%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 2 binary64) ky))))) (.f64 (.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) Om) Om))) #s(literal -1/2 binary64)))
✓	62.7%	(sqrt.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (/.f64 (.f64 (.f64 (.f64 l l) #s(literal 4 binary64)) #s(approx (- ( 1/2 (- 1 (cos (+ ky ky)))) (- (* (cos (+ kx kx)) 1/2) 1/2)) (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))) (.f64 Om Om)) #s(literal -1 binary64)))) #s(literal -1/2 binary64)))
	75.9%	(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 l l) Om) (.f64 #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) #s(approx (- 1/2 ( 1/2 (cos (+ ky ky)))) (*.f64 ky ky))) (+.f64 l l))) Om)))))))
	92.2%	(sqrt.f64 (.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (+.f64 l l) Om) (.f64 (/.f64 (+.f64 l l) Om) #s(approx (+ (pow (sin kx) 2) (pow (sin ky) 2)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 ky ky))))))))))))))
✓	63.2%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))
✓	55.9%	(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))

Compiler

Compiled 183 to 89 computations (51.4% saved)

regimes422.0ms (10.4%)

Memory

-8.1MiB live, 293.3MiB allocated; 5ms collecting garbage

Counts

1 → 1

4 → 2

7 → 2

8 → 2

17 → 2

19 → 2

20 → 1

21 → 1

Calls

Call 1

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

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

Call 2

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

Outputs

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

(sqrt.f64 #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)))

Call 3

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

Outputs

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

Call 4

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

Outputs

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

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

Call 5

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

Outputs

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

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

Call 6

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

Outputs

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

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

Call 7

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

Call 8

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

118 calls:

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

Results

Accuracy	Segments	Branch
55.9%	1	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
55.9%	1	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
55.9%	1	`ky`
55.9%	1	`(sin.f64 kx)`
55.9%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
55.9%	1	`kx`
55.9%	1	`Om`
55.9%	1	`(*.f64 #s(literal 2 binary64) l)`
55.9%	1	`l`
55.9%	1	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
55.9%	1	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
55.9%	1	`(sin.f64 ky)`
55.9%	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))))`
55.9%	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)))))`
55.9%	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))))))`
55.9%	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)))))))`
55.9%	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))))))))`
55.9%	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)))))))))`
55.9%	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))))))))))`
97.6%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
97.6%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
98.8%	2	`(.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))`
98.8%	2	`(+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))`
98.8%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
98.8%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
98.8%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
98.8%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
98.8%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
98.9%	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.9%	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.9%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
98.9%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
98.9%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
98.9%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
98.9%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
98.9%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
98.9%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
80.1%	2	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
83.2%	2	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
98.9%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
98.9%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
98.9%	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.9%	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.9%	2	`(sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))`
98.9%	2	`(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))`
98.9%	2	`(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))`
98.9%	2	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))`
98.9%	2	`(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))))))))))`
85.7%	2	`ky`
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.3%	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.3%	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.3%	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.3%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
99.3%	2	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
99.3%	2	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
99.3%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
99.3%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
99.3%	2	`ky`
99.7%	3	`(sin.f64 ky)`
99.7%	2	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
92.6%	1	`(sin.f64 kx)`
92.6%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.7%	2	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
96.6%	2	`(*.f64 #s(literal 2 binary64) l)`
99.7%	2	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
99.7%	2	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
99.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.3%	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.3%	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.3%	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.3%	2	`(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))`
96.6%	2	`l`
94.2%	2	`Om`
92.6%	1	`kx`
99.7%	2	`ky`
98.9%	1	`(sin.f64 ky)`
98.9%	1	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
98.9%	1	`(sin.f64 kx)`
98.9%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
98.9%	1	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
98.9%	1	`(*.f64 #s(literal 2 binary64) l)`
98.9%	1	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
98.9%	1	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
98.9%	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.9%	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.9%	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.9%	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.9%	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.9%	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.9%	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.9%	1	`l`
98.9%	1	`Om`
98.9%	1	`kx`
98.9%	1	`ky`
99.2%	1	`(sin.f64 ky)`
99.2%	1	`(pow.f64 (sin.f64 ky) #s(literal 2 binary64))`
99.2%	1	`(sin.f64 kx)`
99.2%	1	`(pow.f64 (sin.f64 kx) #s(literal 2 binary64))`
99.2%	1	`(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))`
99.2%	1	`(*.f64 #s(literal 2 binary64) l)`
99.2%	1	`(/.f64 (*.f64 #s(literal 2 binary64) l) Om)`
99.2%	1	`(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))`
99.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))))`
99.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)))))`
99.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))))))`
99.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)))))))`
99.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))))))))`
99.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)))))))))`
99.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))))))))))`
99.2%	1	`l`
99.2%	1	`Om`
99.2%	1	`kx`
99.2%	1	`ky`

Compiler

Compiled 2 028 to 1 433 computations (29.3% saved)

bsearch4.0ms (0.1%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
3.0ms	3.6795846070155285e-9	4.101254322005682e-7

Samples

2.0ms

16×

valid

Compiler

Compiled 92 to 70 computations (23.9% saved)

Precisions

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

ival-sin: 1.0ms (53.3% of total, 0.1 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.0 MiB)

ival-sqrt: 0.0ms (0.0% of total, 0.0 MiB)

ival-pow2: 0.0ms (0.0% of total, 0.1 MiB)

ival-div!: 0.0ms (0.0% of total, 0.0 MiB)

ival-mult!: 0.0ms (0.0% of total, 0.0 MiB)

bsearch1.0ms (0.0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
0.0ms	3.6795846070155285e-9	4.101254322005682e-7

Compiler

Compiled 85 to 66 computations (22.4% saved)

bsearch0.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0017411594277864397	271.1126391106098

Compiler

Compiled 38 to 31 computations (18.4% saved)

bsearch0.0ms (0.0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0017411594277864397	271.1126391106098

Compiler

Compiled 38 to 31 computations (18.4% saved)

bsearch12.0ms (0.3%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
11.0ms	0.7312245665939996	0.9995919382256941

Samples

8.0ms

64×

valid

Compiler

Compiled 76 to 63 computations (17.1% saved)

Precisions

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

ival-sin: 3.0ms (48.7% of total, 0.4 MiB)

ival-sqrt: 1.0ms (16.2% of total, 0.2 MiB)

ival-pow2: 1.0ms (16.2% of total, 0.2 MiB)

ival-div!: 1.0ms (16.2% of total, 0.1 MiB)

ival-mult!: 1.0ms (16.2% of total, 0.1 MiB)

adjust: 0.0ms (0.0% of total, 0.0 MiB)

ival-add!: 0.0ms (0.0% of total, 0.1 MiB)

derivations80.0ms (2.0%)

Memory

-2.2MiB live, 5.6MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 314 to 95 computations (69.7% saved)

preprocess142.0ms (3.5%)

Memory: -2.2MiB live, 143.4MiB allocated; 10ms collecting garbage
Compiler: Compiled 5 037 to 3 299 computations (34.5% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze110.0ms (2.7%)

sample1.4s (35.2%)

preprocess43.0ms (1.1%)

series88.0ms (2.2%)

rewrite107.0ms (2.6%)

eval70.0ms (1.7%)

prune9.0ms (0.2%)

series181.0ms (4.4%)

rewrite172.0ms (4.2%)

eval144.0ms (3.5%)

prune18.0ms (0.4%)

series192.0ms (4.7%)

rewrite172.0ms (4.2%)

eval136.0ms (3.3%)

prune17.0ms (0.4%)

series184.0ms (4.5%)

rewrite174.0ms (4.3%)

eval140.0ms (3.5%)

prune18.0ms (0.5%)

regimes422.0ms (10.4%)

bsearch4.0ms (0.1%)

bsearch1.0ms (0.0%)

bsearch0.0ms (0.0%)

bsearch0.0ms (0.0%)

bsearch12.0ms (0.3%)

derivations80.0ms (2.0%)

preprocess142.0ms (3.5%)

end0.0ms (0.0%)

Profiling